Computer Life 1996 January

home *** CD-ROM | disk | FTP | other *** search

/ Computer Life 1996 January / Computer Life January 1996.iso / vis3 / demos / office.vrt / world.script < prev next >

Wrap

Text File | 1994-02-18 | 188.1 KB | 12,771 lines

; ; Script conversion of file OFFICE.WLD ; Type: WRLD Title: "\n\n\r" "World file OFFICE.WLD revision 61\n\r" "Saved from VRT version 3.10\n\r" "\x1A" ; ;-------Object 0------------------------------------------------------- ; Chunk: Standard Name: "Root Object" Number: 0 Size: 2147483647 2147483647 2147483647 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: Attachments Number: 5 Facet: 0 Object: 55 Facet: 0 Object: 55 Facet: 0 Object: 21 Facet: 0 Object: 178 Facet: 0 Object: 4 End_Chunk Chunk: ViewPoint Number: 100 Subchunk Number: 1 Type: 35 View: 7 Control: 7 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 8935 13931 26857 Rotation: 0 Frame: 0 Type: Relative Offset: 2349 55894 346 Zoom: 0x1BFD Subchunk Number: 2 Type: 19 View: 90 Control: 89 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 413 8131 445 Rotation: 0 Frame: 0 Type: Relative Offset: 910 65388 0 Zoom: 0x1BFD Subchunk Number: 3 Type: 22 View: 114 Control: 115 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 573 538 1087 Rotation: 0 Frame: 0 Type: Relative Offset: 63965 25 0 Zoom: 0x1BFD Subchunk Number: 4 Type: 23 View: 114 Control: 115 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 563 538 1093 Rotation: 0 Frame: 0 Type: Relative Offset: 63965 25 0 Zoom: 0x1BFD Subchunk Number: 5 Type: 23 View: 114 Control: 115 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 650 1383 -3136 Rotation: 0 Frame: 0 Type: Relative Offset: 1159 25 0 Zoom: 0x1BFD Subchunk Number: 6 Type: 20 View: 114 Control: 115 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 551 532 1102 Rotation: 0 Frame: 0 Type: Relative Offset: 63965 25 0 Zoom: 0x1BFD Subchunk Number: 7 Type: 23 View: 7 Control: 115 Point: 0 Frames: 2 Locks: zyx Position: 0 Frame: 0 Type: StraightMove Pos: 6808 15177 25847 Rotation: 0 Frame: 0 Target: 114 Offset: 500 125 1000 Zoom: 0x1BFD Subchunk Number: 8 Type: 20 View: 114 Control: 115 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 553 533 1100 Rotation: 0 Frame: 0 Type: Relative Offset: 63965 25 0 Zoom: 0x1BFD End_Chunk Chunk: Colours Number: 6 0xFA 0x06 0x01 0xF0 0x03 0xFF End_Chunk Children: ; ;-------Object 68------------------------------------------------------- ; Chunk: Standard Name: "groundfloor" Number: 68 Size: 100000 30000 73100 Position: 2045000 0 2008000 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 88------------------------------------------------------- ; Chunk: Standard Name: "roof" Number: 88 Size: 71000 0 73000 Position: 0 24000 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0xB4 End_Chunk ; ;-------Object 314------------------------------------------------------- ; Chunk: Standard Name: "CORIDOOR[314]" Number: 314 Size: 24500 24000 73100 Position: 71000 0 0 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 315------------------------------------------------------- ; Chunk: Standard Name: "wall3[315]" Number: 315 Size: 5000 24000 500 Position: 500 0 72200 Type: 10 Layer: 0 End_Chunk Chunk: Attachments Number: 1 Facet: 4 Object: 347 End_Chunk Chunk: Colours Number: 8 0x43 0x14 0x13 0x45 0x14 0x12 0x42 0x85 End_Chunk ; ;-------Object 339------------------------------------------------------- ; Chunk: Standard Name: "wall3[339]" Number: 339 Size: 13500 24000 500 Position: 5500 0 72200 Type: 9 Layer: 0 End_Chunk Chunk: Attachments Number: 1 Facet: 15 Object: 340 End_Chunk Chunk: Colours Number: 16 0x12 0x13 0x17 0xBC 0x14 0x13 0x16 0x11 0x00 0x00 0x00 0x00 0x12 0x12 0x42 0x00 End_Chunk ; ;-------Object 338------------------------------------------------------- ; Chunk: Standard Name: "wall3[338]" Number: 338 Size: 5000 24000 500 Position: 19000 0 72200 Type: 20 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x43 0x14 0x13 0x45 0x14 0x12 0x42 0x85 End_Chunk ; ;-------Object 337------------------------------------------------------- ; Chunk: Standard Name: "corner4[337]" Number: 337 Size: 500 24000 500 Position: 24000 0 72200 Type: 21 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x14 0x46 0x15 0x13 0x43 0x1D End_Chunk ; ;-------Object 318------------------------------------------------------- ; Chunk: Standard Name: "corner4[318]" Number: 318 Size: 500 24000 500 Position: 0 0 72200 Type: 33 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x14 0x46 0x15 0x13 0x43 0x1D End_Chunk ; ;-------Object 317------------------------------------------------------- ; Chunk: Standard Name: "corner3[317]" Number: 317 Size: 500 24000 500 Position: 24000 0 0 Type: 31 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x14 0x46 0x15 0x13 0x43 0x1D End_Chunk ; ;-------Object 316------------------------------------------------------- ; Chunk: Standard Name: "corner3[316]" Number: 316 Size: 500 24000 500 Position: 0 0 0 Type: 32 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x14 0x46 0x15 0x13 0x43 0x1D End_Chunk ; ;-------Object 313------------------------------------------------------- ; Chunk: Standard Name: "wall1[313]" Number: 313 Size: 500 24000 71700 Position: 24000 0 500 Type: 29 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x45 0x16 0x15 0x47 0x16 0x14 0x44 0x85 End_Chunk ; ;-------Object 310------------------------------------------------------- ; Chunk: Standard Name: "wall4[310]" Number: 310 Size: 500 24000 41000 Position: 0 0 500 Type: 30 Layer: 0 End_Chunk Chunk: Colours Number: 12 0x45 0x16 0x15 0x47 0x16 0x14 0x44 0x46 0x17 0x00 0x00 0xFF End_Chunk ; ;-------Object 312------------------------------------------------------- ; Chunk: Standard Name: "wall4[312]" Number: 312 Size: 500 24000 21000 Position: 0 0 51200 Type: 30 Layer: 0 End_Chunk Chunk: Colours Number: 12 0x45 0x16 0x15 0x47 0x16 0x14 0x44 0x00 0x00 0x44 0x13 0x00 End_Chunk ; ;-------Object 311------------------------------------------------------- ; Chunk: Standard Name: "roof[311]" Number: 311 Size: 24500 0 73000 Position: 0 24000 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x43 End_Chunk ; ;-------Object 308------------------------------------------------------- ; Chunk: Standard Name: "wall5[308]" Number: 308 Size: 23500 24000 500 Position: 500 0 0 Type: 8 Layer: 0 End_Chunk Chunk: Colours Number: 30 0x43 0x14 0x13 0x45 0x45 0x45 0x42 0x12 0x14 0x12 0x14 0x42 0x42 0x13 0x15 0x15 0x15 0xAB 0x12 0x13 0x13 0x13 0x11 0x16 0x10 0x11 0x11 0x10 0xE0 0xCC End_Chunk ; ;-------Object 32------------------------------------------------------- ; Chunk: Standard Name: "door[32]" Number: 32 Size: 400 19900 8300 Position: 0 50 42200 Type: 88 Layer: 0 DFlags: r End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 500 0 0 End_Chunk Chunk: SCL long knock; /* if activated then sound a loud knock of slightly random pitch */ resume (0, 2); if (activate (me, 0)) { knock=random (2); sound (1, 70+knock, 50, 0); repeat (3) waitf; sound (1, 70+knock, 0, 0); } end End_Chunk ; ;-------Object 319------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[319]" Number: 319 Size: 10600 400 1000 Position: 6828 23600 17223 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 320------------------------------------------------------- ; Chunk: Standard Name: "lightend2[320]" Number: 320 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 321------------------------------------------------------- ; Chunk: Standard Name: "tube1[321]" Number: 321 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 322------------------------------------------------------- ; Chunk: Standard Name: "tube2[322]" Number: 322 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 323------------------------------------------------------- ; Chunk: Standard Name: "lightend1[323]" Number: 323 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 324------------------------------------------------------- ; Chunk: Standard Name: "lightend1[324]" Number: 324 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 325------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[325]" Number: 325 Size: 10600 400 1000 Position: 7204 23600 56783 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 326------------------------------------------------------- ; Chunk: Standard Name: "lightend2[326]" Number: 326 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 327------------------------------------------------------- ; Chunk: Standard Name: "tube1[327]" Number: 327 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 328------------------------------------------------------- ; Chunk: Standard Name: "tube2[328]" Number: 328 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 329------------------------------------------------------- ; Chunk: Standard Name: "lightend1[329]" Number: 329 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 330------------------------------------------------------- ; Chunk: Standard Name: "lightend1[330]" Number: 330 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 331------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[331]" Number: 331 Size: 10600 400 1000 Position: 7192 23600 36389 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 332------------------------------------------------------- ; Chunk: Standard Name: "lightend2[332]" Number: 332 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 333------------------------------------------------------- ; Chunk: Standard Name: "tube1[333]" Number: 333 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 334------------------------------------------------------- ; Chunk: Standard Name: "tube2[334]" Number: 334 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 335------------------------------------------------------- ; Chunk: Standard Name: "lightend1[335]" Number: 335 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 336------------------------------------------------------- ; Chunk: Standard Name: "lightend1[336]" Number: 336 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 109------------------------------------------------------- ; Chunk: Standard Name: "doors" Number: 109 Size: 13000 24000 100 Position: 6000 200 72700 Type: 47 Layer: 0 End_Chunk Chunk: Colours Number: 12 0x15 0x15 0x19 0x19 0x14 0x15 0x1D 0x17 0x10 0x36 0x36 0x00 End_Chunk ; ;-------Object 167------------------------------------------------------- ; Chunk: Standard Name: "DISPLAY[167]" Number: 167 Size: 7700 2100 300 Position: 8100 21200 71900 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 110------------------------------------------------------- ; Chunk: Standard Name: "DISPLAY" Number: 110 Size: 7700 2100 300 Position: 0 0 107 Type: 48 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x4D 0x25 0x25 0x25 0x25 0x29 0x23 0x27 0x21 0x01 0x22 0x21 0x27 0x29 End_Chunk Chunk: SCL short x; char *p; /* this display takes a string and places the ascii values of that string into the 8 display elements. It then continuously shuffles them to the left in a scrolling display */ resume (0, 2); p="DIMENSION INTERNATIONAL WOULD LIKE TO WELCOME YOU TO THE OFF" "ICE DEMONSTRATION--\r"; /* this string contains the message to be displayed */ #111.c=#112.c; #112.c=#113.c; /* shuffles the characters along to the next element */ #113.c=#162.c; #162.c=#163.c; #163.c=#164.c; #164.c=#165.c; #165.c=#166.c; #166.c=* (p+x); /* picks the next character in the string and places the ascii value in the end element */ x+=1; if (#166.c==13) { /* checks for end of message '\r' */ x=0; #166.c=0; } else #166.c-=32; waitf; /* pauses here a frame so as to slow down the speed of display */ end End_Chunk Children: ; ;-------Object 111------------------------------------------------------- ; Chunk: Standard Name: "Disp1" Number: 111 Size: 630 1050 15 Position: 773 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; /* each element has an ascii value (-32) stored in the 'c' variable, this is used to look up a table which colours the relevent segments of this element *//* This variable defines what colour this elements segments will be */ Col=0xC; if (c!=pc) { /* The table below contains the bitwise value needed to turn on the relevent segments of this element. The values are used acording to the ascii value (-32) stored in 'c'. If c=0 (a space) then the value 0 will be used to colour the segments of the element, in this case all facets will be coloured invisable */ pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 112------------------------------------------------------- ; Chunk: Standard Name: "Disp1[2]" Number: 112 Size: 630 1050 15 Position: 1675 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; /* defines the colur used by this element of the display. each element of the display could have a different colour */ if (c!=pc) { pc=c; /* uses the asci value in c to look up a bitwise value */ x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { /* the bitwise value is now used to turn on/off the different segments of this display element- eg. the value 0 would turn off all the segments */ if (x & 8192) setcol (Col, inloop, me); /* if bit on then colour current segment */ else setcol (0, inloop, me); /* if bit off then colour current segment transparent */ x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 113------------------------------------------------------- ; Chunk: Standard Name: "Disp1[3]" Number: 113 Size: 630 1050 15 Position: 2445 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 162------------------------------------------------------- ; Chunk: Standard Name: "Disp1[4]" Number: 162 Size: 630 1050 15 Position: 3285 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 163------------------------------------------------------- ; Chunk: Standard Name: "Disp1[5]" Number: 163 Size: 630 1050 15 Position: 4055 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 164------------------------------------------------------- ; Chunk: Standard Name: "Disp1[6]" Number: 164 Size: 630 1050 15 Position: 4825 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 165------------------------------------------------------- ; Chunk: Standard Name: "Disp1[7]" Number: 165 Size: 630 1050 15 Position: 5595 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk ; ;-------Object 166------------------------------------------------------- ; Chunk: Standard Name: "Disp1[8]" Number: 166 Size: 630 1050 15 Position: 6365 519 45 Type: 49 Layer: 0 End_Chunk Chunk: SCL unsigned char c, pc, Col; short x; Col=0xC; if (c!=pc) { pc=c; x=table (c) {0, 0, 288, 5455, 5485, 8740, 4729, 512, 2560, 8320, 16320, 5440, 8192, 1088, 4096, 8704, 8767, 6, 1115, 1103, 1126, 1133, 1149, 8705, 1151, 1135, 0, 0, 2560, 1096, 8320, 5123, 0, 1143, 2681, 57, 2232, 1145, 1137, 1085, 1142, 4361, 30, 2672, 56, 4790, 2230, 63, 1139, 2111, 3187, 1133, 4353, 62, 8752, 10294, 10880, 4736, 8713, 57, 2176, 15, 514, 8}; repeat (14) { if (x & 8192) setcol (Col, inloop, me); else setcol (0, inloop, me); x+=x; } } end End_Chunk Chunk: Default Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk Chunk: Colours Number: 16 0x60 0x60 0x00 0x60 0x60 0x00 0x60 0x00 0x00 0x00 0x60 0x00 0x00 0x00 0x00 0x10 End_Chunk End_Children End_Children End_Children ; ;-------Object 7------------------------------------------------------- ; Chunk: Standard Name: "floor" Number: 7 Size: 94500 0 72000 Position: 500 0 500 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x25 0x00 End_Chunk ; ;-------Object 36------------------------------------------------------- ; Chunk: Standard Name: "ROOM[36]" Number: 36 Size: 71000 24000 72700 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 9------------------------------------------------------- ; Chunk: Standard Name: "wall3" Number: 9 Size: 70000 24000 500 Position: 500 0 72200 Type: 20 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x14 0x13 0x12 0xB4 0x17 0x14 0xB3 0x85 End_Chunk ; ;-------Object 30------------------------------------------------------- ; Chunk: Standard Name: "corner4" Number: 30 Size: 500 24000 500 Position: 70500 0 72200 Type: 21 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x13 0xB5 0x18 0x15 0xB4 0x1D End_Chunk ; ;-------Object 87------------------------------------------------------- ; Chunk: Standard Name: "corner2" Number: 87 Size: 500 24000 500 Position: 0 0 0 Type: 32 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x13 0xB5 0x18 0x15 0xB4 0x1D End_Chunk ; ;-------Object 86------------------------------------------------------- ; Chunk: Standard Name: "corner1" Number: 86 Size: 500 24000 500 Position: 0 0 72200 Type: 33 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x13 0xB5 0x18 0x15 0xB4 0x1D End_Chunk ; ;-------Object 33------------------------------------------------------- ; Chunk: Standard Name: "doorway" Number: 33 Size: 500 24000 9680 Position: 70500 0 41500 Type: 22 Layer: 0 End_Chunk Chunk: SCL long open; /* if activated then open door */ if (activate (me, 0)) { if (yrot (#32)<1) { open=10; write (&dflags (#32))=bset (dflags (#32), 30); write (&dflags (me))=bset (dflags (me), 30); } else { if (yrot (#32)>179) { open=-10; write (&dflags (#32))=bclr (dflags (#32), 30); write (&dflags (me))=bclr (dflags (me), 30); } } } if (open!=0) yrot (#32)+=open; if (yrot (#32)>179 || yrot (#32)<1) open=0; end End_Chunk Chunk: Colours Number: 16 0x15 0x13 0x18 0x54 0x17 0x17 0x13 0x14 0x15 0x15 0x15 0xB5 0x15 0x15 0x44 0xFF End_Chunk ; ;-------Object 10------------------------------------------------------- ; Chunk: Standard Name: "wall2" Number: 10 Size: 500 24000 21000 Position: 70500 0 51200 Type: 29 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x16 0x15 0x14 0xB6 0x19 0x16 0xB5 0x85 End_Chunk ; ;-------Object 35------------------------------------------------------- ; Chunk: Standard Name: "wall1" Number: 35 Size: 500 24000 41000 Position: 70500 0 500 Type: 29 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x16 0x15 0x14 0xB6 0x19 0x16 0xB5 0x85 End_Chunk ; ;-------Object 31------------------------------------------------------- ; Chunk: Standard Name: "wall4" Number: 31 Size: 500 24000 71700 Position: 0 0 500 Type: 30 Layer: 0 End_Chunk Chunk: Colours Number: 12 0x16 0x15 0x14 0xB6 0x19 0x16 0xB5 0x00 0xFF 0x00 0x00 0x00 End_Chunk Children: ; ;-------Object 386------------------------------------------------------- ; Chunk: Standard Name: "plug-socket" Number: 386 Size: 300 750 1000 Position: 0 2500 27502 Type: 85 Layer: 0 OFlags: Aa End_Chunk Chunk: SCL /* if switch is activated, animate it & set the 'auto' variables on the two pictures according to the state of the switch. */ resume (2, 2); if (activate (me, 0)) { animode (#386, 1)=7; if (ccel (me, 1)=2) #179.aut=#481.aut=1; else #179.aut=#481.aut=0; waitfs (10); clrtrig (me, 0); } end End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: Distancing Visible: 6000 Invisible: 6375 Replace: 387 End_Chunk ; ;-------Object 387------------------------------------------------------- ; Chunk: Standard Name: "plug-socket[387]" Number: 387 Size: 300 750 1000 Position: 0 2500 27502 Type: 86 Layer: 0 DFlags: R OFlags: ri End_Chunk End_Children ; ;-------Object 37------------------------------------------------------- ; Chunk: Standard Name: "tablehold" Number: 37 Size: 10000 7250 18000 Position: 33000 10 36700 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 1------------------------------------------------------- ; Chunk: Standard Name: "desk" Number: 1 Size: 18100 7250 8500 Position: -4068 0 5313 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x3555 0x0000 Centre: 9050 3625 4250 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 361------------------------------------------------------- ; Chunk: Standard Name: "desk[361]" Number: 361 Size: 17700 200 7500 Position: 200 7050 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x55 0x00 0x56 0x54 0x2B End_Chunk ; ;-------Object 364------------------------------------------------------- ; Chunk: Standard Name: "desk[364]" Number: 364 Size: 17700 4050 200 Position: 200 3000 8300 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x57 0x00 0x55 0x00 0x2B End_Chunk ; ;-------Object 362------------------------------------------------------- ; Chunk: Standard Name: "desk[362]" Number: 362 Size: 200 7250 7500 Position: 0 0 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x57 0x56 0x56 0x53 0x2B End_Chunk ; ;-------Object 363------------------------------------------------------- ; Chunk: Standard Name: "desk[363]" Number: 363 Size: 200 7250 7500 Position: 17900 0 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x56 0x57 0x55 0x56 0x53 0x2B End_Chunk ; ;-------Object 2------------------------------------------------------- ; Chunk: Standard Number: 2 Size: 4400 5500 8000 Position: 12285 0 243 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 354------------------------------------------------------- ; Chunk: Standard Name: "draw" Number: 354 Size: 4000 1500 6000 Position: 200 500 1800 Type: 12 Layer: 0 End_Chunk Chunk: Colours Number: 25 0x28 0x11 0x2E 0x2F 0x2E 0x2A 0x2B 0x2A 0x2B 0x2A 0x42 0x44 0x45 0x45 0x43 0x56 0x43 0x43 0x55 0x46 0x46 0x55 0x42 0x2B 0x45 End_Chunk Chunk: InitPos Position: 200 500 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; if (zpos (me)==1800) invis (child (me)); else vis (child (me)); end End_Chunk Children: ; ;-------Object 92------------------------------------------------------- ; Chunk: Standard Name: "can[5]" Number: 92 Size: 720 1200 720 Position: 1000 200 1000 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x4000 0x0000 Centre: 360 600 360 End_Chunk Children: ; ;-------Object 93------------------------------------------------------- ; Chunk: Standard Name: "can[4]" Number: 93 Size: 720 40 720 Position: 0 0 0 Type: 62 Layer: 0 End_Chunk ; ;-------Object 94------------------------------------------------------- ; Chunk: Standard Name: "can" Number: 94 Size: 720 1120 720 Position: 0 40 0 Type: 63 Layer: 0 End_Chunk Chunk: TexCoords Number: 20 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 0.04688 1.00000 0.04688 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.04688 0.00000 0.04688 1.00000 0.09375 1.00000 0.09375 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.09766 0.00000 0.09766 1.00000 0.14453 1.00000 0.14453 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.14844 0.00000 0.14844 1.00000 0.19531 1.00000 0.19531 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.19922 0.00000 0.19922 1.00000 0.24609 1.00000 0.24609 0.00000 SubChunk Facet: 6 ImageRef: 1 PixScale: 0 NumCoords: 4 0.25000 0.00000 0.25000 1.00000 0.29688 1.00000 0.29688 0.00000 SubChunk Facet: 7 ImageRef: 1 PixScale: 0 NumCoords: 4 0.29688 0.00000 0.29688 1.00000 0.34375 1.00000 0.34375 0.00000 SubChunk Facet: 8 ImageRef: 1 PixScale: 0 NumCoords: 4 0.34766 0.00000 0.34766 1.00000 0.39453 1.00000 0.39453 0.00000 SubChunk Facet: 9 ImageRef: 1 PixScale: 0 NumCoords: 4 0.39844 0.00000 0.39844 1.00000 0.44531 1.00000 0.44531 0.00000 SubChunk Facet: 10 ImageRef: 1 PixScale: 0 NumCoords: 4 0.44922 0.00000 0.44922 1.00000 0.49609 1.00000 0.49609 0.00000 SubChunk Facet: 11 ImageRef: 1 PixScale: 0 NumCoords: 4 0.50000 0.00000 0.50000 1.00000 0.54688 1.00000 0.54688 0.00000 SubChunk Facet: 12 ImageRef: 1 PixScale: 0 NumCoords: 4 0.54688 0.00000 0.54688 1.00000 0.59375 1.00000 0.59375 0.00000 SubChunk Facet: 13 ImageRef: 1 PixScale: 0 NumCoords: 4 0.59766 0.00000 0.59766 1.00000 0.64453 1.00000 0.64453 0.00000 SubChunk Facet: 14 ImageRef: 1 PixScale: 0 NumCoords: 4 0.64844 0.00000 0.64844 1.00000 0.69531 1.00000 0.69531 0.00000 SubChunk Facet: 15 ImageRef: 1 PixScale: 0 NumCoords: 4 0.69922 0.00000 0.69922 1.00000 0.74609 1.00000 0.74609 0.00000 SubChunk Facet: 16 ImageRef: 1 PixScale: 0 NumCoords: 4 0.75000 0.00000 0.75000 1.00000 0.79688 1.00000 0.79688 0.00000 SubChunk Facet: 17 ImageRef: 1 PixScale: 0 NumCoords: 4 0.79688 0.00000 0.79688 1.00000 0.84375 1.00000 0.84375 0.00000 SubChunk Facet: 18 ImageRef: 1 PixScale: 0 NumCoords: 4 0.84766 0.00000 0.84766 1.00000 0.89453 1.00000 0.89453 0.00000 SubChunk Facet: 19 ImageRef: 1 PixScale: 0 NumCoords: 4 0.89844 0.00000 0.89844 1.00000 0.94531 1.00000 0.94531 0.00000 SubChunk Facet: 20 ImageRef: 1 PixScale: 0 NumCoords: 4 0.94922 0.00000 0.94922 1.00000 0.99609 1.00000 0.99609 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 1 End_Chunk ; ;-------Object 95------------------------------------------------------- ; Chunk: Standard Name: "can[3]" Number: 95 Size: 720 40 720 Position: 0 1160 0 Type: 64 Layer: 0 End_Chunk End_Children End_Children ; ;-------Object 3------------------------------------------------------- ; Chunk: Standard Name: "draw[3]" Number: 3 Size: 4000 1500 6000 Position: 200 2000 1800 Type: 12 Layer: 0 End_Chunk Chunk: Colours Number: 24 0x28 0x11 0x2E 0x2F 0x2E 0x2A 0x2B 0x2A 0x2B 0x2A 0x42 0x44 0x45 0x45 0x43 0x55 0x43 0x43 0x55 0x46 0x46 0x55 0x42 0x2B End_Chunk Chunk: InitPos Position: 200 2000 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; end End_Chunk Children: ; ;-------Object 6------------------------------------------------------- ; Chunk: Standard Name: "bookgroup[6]" Number: 6 Size: 2000 170 1400 Position: 1000 200 1000 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 358------------------------------------------------------- ; Chunk: Standard Name: "book[358]" Number: 358 Size: 1800 120 1200 Position: 100 50 100 Type: 27 Layer: 0 End_Chunk Chunk: Colours Number: 13 0x16 0x15 0x11 0x15 0x16 0x17 0x15 0x12 0x13 0x14 0x14 0x13 0x10 End_Chunk ; ;-------Object 359------------------------------------------------------- ; Chunk: Standard Number: 359 Size: 2000 50 1400 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1D 0x1F 0x1A 0x1E 0x1C 0x2B End_Chunk End_Children End_Children ; ;-------Object 4------------------------------------------------------- ; Chunk: Standard Name: "draw[4]" Number: 4 Size: 4000 1500 6000 Position: 200 3500 1800 Type: 12 Layer: 0 End_Chunk Chunk: InitPos Position: 200 3500 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; end End_Chunk Children: ; ;-------Object 5------------------------------------------------------- ; Chunk: Standard Name: "pencil2[5]" Number: 5 Size: 1700 100 100 Position: 1100 200 1100 Type: 28 Layer: 0 End_Chunk End_Children ; ;-------Object 355------------------------------------------------------- ; Chunk: Standard Name: "draw[355]" Number: 355 Size: 200 5000 6000 Position: 0 0 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x56 0x55 0x57 0x00 0x00 0x2B End_Chunk ; ;-------Object 356------------------------------------------------------- ; Chunk: Standard Name: "draw[356]" Number: 356 Size: 200 5000 6000 Position: 4200 0 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x57 0x55 0x56 0x00 0x00 0x2B End_Chunk ; ;-------Object 357------------------------------------------------------- ; Chunk: Standard Name: "draw[357]" Number: 357 Size: 4400 5000 200 Position: 0 0 7800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x56 0x00 0x56 0x57 0x00 0x2B End_Chunk ; ;-------Object 360------------------------------------------------------- ; Chunk: Standard Name: "draw[360]" Number: 360 Size: 4400 200 6200 Position: 0 5000 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x55 0x55 0x3D 0x54 0x57 End_Chunk End_Children End_Children End_Children ; ;-------Object 12------------------------------------------------------- ; Chunk: Standard Name: "tablecontents" Number: 12 Size: 9900 7250 15000 Position: 33000 7260 39333 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 27------------------------------------------------------- ; Chunk: Standard Name: "Calculator" Number: 27 Size: 1360 500 1472 Position: 7467 0 5811 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x2000 0x0000 Centre: 680 250 736 End_Chunk Children: ; ;-------Object 28------------------------------------------------------- ; Chunk: Standard Name: "function[109]" Number: 28 Size: 1360 50 1059 Position: 0 0 0 Type: 90 Layer: 0 End_Chunk ; ;-------Object 160------------------------------------------------------- ; Chunk: Standard Name: "numeric[110]" Number: 160 Size: 642 50 859 Position: 143 50 112 Type: 65535 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 367 End_Chunk Children: ; ;-------Object 161------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[111]" Number: 161 Size: 200 50 199 Position: 0 0 219 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#180, 0)) { strcpy (#381.con+#381.which, "1"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#180))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#180))=ysize (me); clrtrig (me, 0); clrtrig (#180, 0); } end End_Chunk Children: ; ;-------Object 180------------------------------------------------------- ; Chunk: Standard Name: "ICON[112]" Number: 180 Size: 54 0 133 Position: 74 50 36 Type: 92 Layer: 0 End_Chunk End_Children ; ;-------Object 182------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[113]" Number: 182 Size: 200 50 199 Position: 220 0 219 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#190, 0)) { strcpy (#381.con+#381.which, "2"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#190))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#190))=ysize (me); clrtrig (me, 0); clrtrig (#190, 0); } end End_Chunk Children: ; ;-------Object 190------------------------------------------------------- ; Chunk: Standard Name: "ICON[114]" Number: 190 Size: 85 0 133 Position: 62 50 36 Type: 93 Layer: 0 End_Chunk Chunk: Colours Number: 13 0x00 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 257------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[115]" Number: 257 Size: 200 50 199 Position: 440 0 219 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#258, 0)) { strcpy (#381.con+#381.which, "3"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#258))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#258))=ysize (me); clrtrig (me, 0); clrtrig (#258, 0); } end End_Chunk Children: ; ;-------Object 258------------------------------------------------------- ; Chunk: Standard Name: "ICON[116]" Number: 258 Size: 75 0 133 Position: 71 50 36 Type: 94 Layer: 0 End_Chunk Chunk: Colours Number: 15 0x00 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 259------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[117]" Number: 259 Size: 200 50 199 Position: 0 0 439 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#270, 0)) { strcpy (#381.con+#381.which, "4"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#270))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#270))=ysize (me); clrtrig (me, 0); clrtrig (#270, 0); } end End_Chunk Children: ; ;-------Object 270------------------------------------------------------- ; Chunk: Standard Name: "ICON[118]" Number: 270 Size: 85 0 133 Position: 58 50 36 Type: 95 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x00 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 293------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[119]" Number: 293 Size: 200 50 199 Position: 220 0 439 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#294, 0)) { strcpy (#381.con+#381.which, "5"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#294))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#294))=ysize (me); clrtrig (me, 0); clrtrig (#294, 0); } end End_Chunk Children: ; ;-------Object 294------------------------------------------------------- ; Chunk: Standard Name: "ICON[120]" Number: 294 Size: 80 0 133 Position: 65 50 36 Type: 96 Layer: 0 End_Chunk Chunk: Colours Number: 13 0x00 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 295------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[121]" Number: 295 Size: 200 50 199 Position: 440 0 439 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#297, 0)) { strcpy (#381.con+#381.which, "6"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#297))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#297))=ysize (me); clrtrig (me, 0); clrtrig (#297, 0); } end End_Chunk Children: ; ;-------Object 297------------------------------------------------------- ; Chunk: Standard Name: "ICON[122]" Number: 297 Size: 82 0 133 Position: 60 50 36 Type: 97 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x00 0x2B 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 298------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[123]" Number: 298 Size: 200 50 199 Position: 220 0 0 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#299, 0)) { if (#381.which>0) { strcpy (#381.con+#381.which, "0"); #381.which+=1; } ccel (me, 1)=2; write (&ypos (#299))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#299))=ysize (me); clrtrig (me, 0); clrtrig (#299, 0); } end End_Chunk Children: ; ;-------Object 299------------------------------------------------------- ; Chunk: Standard Name: "ICON[124]" Number: 299 Size: 87 0 133 Position: 56 50 36 Type: 98 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x00 0x24 0x15 End_Chunk End_Children ; ;-------Object 300------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[125]" Number: 300 Size: 200 50 199 Position: 1 0 1 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0xAA 0xA9 0xA8 0xA6 0xA5 0xAB 0xAA 0xA6 0xA7 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#301, 0)) { strcpy (#381.con, " 0"); #381.which=0; #381.cv=0; #381.lv=0; ccel (me, 1)=2; write (&ypos (#301))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#301))=ysize (me); clrtrig (me, 0); clrtrig (#301, 0); } end End_Chunk Children: ; ;-------Object 301------------------------------------------------------- ; Chunk: Standard Name: "ICON[126]" Number: 301 Size: 87 0 133 Position: 56 50 36 Type: 99 Layer: 0 End_Chunk Chunk: Colours Number: 20 0x00 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 End_Chunk End_Children ; ;-------Object 302------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[127]" Number: 302 Size: 200 50 199 Position: 442 0 0 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#303, 0)) { if (#381.which>0) { strcpy (#381.con+#381.which, "."); #381.which+=1; } ccel (me, 1)=2; write (&ypos (#303))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#303))=ysize (me); clrtrig (me, 0); clrtrig (#303, 0); } end End_Chunk Children: ; ;-------Object 303------------------------------------------------------- ; Chunk: Standard Name: "ICON[128]" Number: 303 Size: 10 0 9 Position: 56 50 36 Type: 100 Layer: 0 End_Chunk Chunk: Colours Number: 1 0x15 End_Chunk End_Children ; ;-------Object 304------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[129]" Number: 304 Size: 200 50 199 Position: 0 0 659 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#305, 0)) { strcpy (#381.con+#381.which, "7"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#305))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#305))=ysize (me); clrtrig (me, 0); clrtrig (#305, 0); } end End_Chunk Children: ; ;-------Object 305------------------------------------------------------- ; Chunk: Standard Name: "ICON[130]" Number: 305 Size: 85 0 133 Position: 63 50 36 Type: 101 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x00 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 306------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[131]" Number: 306 Size: 200 50 199 Position: 220 0 659 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#307, 0)) { strcpy (#381.con+#381.which, "8"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#307))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#307))=ysize (me); clrtrig (me, 0); clrtrig (#307, 0); } end End_Chunk Children: ; ;-------Object 307------------------------------------------------------- ; Chunk: Standard Name: "ICON[132]" Number: 307 Size: 73 0 133 Position: 67 50 36 Type: 102 Layer: 0 End_Chunk Chunk: Colours Number: 5 0x00 0x00 0x15 0x00 0x15 End_Chunk End_Children ; ;-------Object 365------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[133]" Number: 365 Size: 200 50 199 Position: 440 0 659 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x4A 0x49 0x48 0x46 0x45 0x4B 0x4A 0x46 0x47 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#366, 0)) { strcpy (#381.con+#381.which, "9"); #381.which+=1; ccel (me, 1)=2; write (&ypos (#366))=ysize (me)/5; while (mouseb) waitf; waitf; ccel (me, 1)=1; write (&ypos (#366))=ysize (me); clrtrig (me, 0); clrtrig (#366, 0); } end End_Chunk Children: ; ;-------Object 366------------------------------------------------------- ; Chunk: Standard Name: "ICON[134]" Number: 366 Size: 82 0 133 Position: 63 50 36 Type: 103 Layer: 0 End_Chunk Chunk: Colours Number: 9 0x00 0x00 0x15 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children End_Children ; ;-------Object 367------------------------------------------------------- ; Chunk: Standard Name: "numeric[21]" Number: 367 Size: 642 50 859 Position: 143 50 112 Type: 104 Layer: 0 DFlags: R OFlags: Ii End_Chunk ; ;-------Object 368------------------------------------------------------- ; Chunk: Standard Name: "function[135]" Number: 368 Size: 420 50 639 Position: 810 50 112 Type: 65535 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 379 End_Chunk Chunk: SCL short function, sf; if (function) { #381.cv=atof (#381.con); /* above converts the ascii string to a floating variable type and places it in cv (current value) */ if (sf) { switch (sf); case 1: #381.cv=#381.lv+#381.cv; case 2: #381.cv=#381.lv-#381.cv; case 3: #381.cv=#381.lv*#381.cv; case 4: #381.cv=#381.lv/#381.cv; /* Above performs the relevent function defined by sf (stored function) on the current value and the stored value */ } #381.which=0; #381.lv=#381.cv; ftoa (#381.con, #381.lv); sf=function; function=0; /* reset values. Store the current value as the last value. Convert the resulting value back into a string for display by the display. Let the stored function = the function last pressed (function). */ /* If a function key has been pressed (function is non 0). And there is a stored function (sf is non 0). Perform the stored function on the current value (cv) and on the last value (lv) and display the result. */ } end End_Chunk Children: ; ;-------Object 369------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[136]" Number: 369 Size: 200 50 419 Position: 0 0 0 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x3A 0x39 0x38 0x36 0x35 0x3B 0x3A 0x36 0x37 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#370, 0)) { ccel (me, 1)=2; write (&ypos (#370))=ysize (me)/5; while (mouseb) waitf; waitf; if (!#368.function) #368.function=1; ccel (me, 1)=1; write (&ypos (#370))=ysize (me); clrtrig (me, 0); clrtrig (#370, 0); } end End_Chunk Children: ; ;-------Object 370------------------------------------------------------- ; Chunk: Standard Name: "ICON[137]" Number: 370 Size: 79 0 79 Position: 62 50 182 Type: 105 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x00 0x15 0x15 End_Chunk End_Children ; ;-------Object 371------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[138]" Number: 371 Size: 200 50 199 Position: 220 0 219 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x3A 0x39 0x38 0x36 0x35 0x3B 0x3A 0x36 0x37 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#372, 0)) { ccel (me, 1)=2; write (&ypos (#372))=ysize (me)/5; while (mouseb) waitf; waitf; if (!#368.function) #368.function=3; ccel (me, 1)=1; write (&ypos (#372))=ysize (me); clrtrig (me, 0); clrtrig (#372, 0); } end End_Chunk Children: ; ;-------Object 372------------------------------------------------------- ; Chunk: Standard Name: "ICON[139]" Number: 372 Size: 74 0 77 Position: 65 50 59 Type: 106 Layer: 0 End_Chunk Chunk: Colours Number: 16 0x00 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk End_Children ; ;-------Object 373------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[140]" Number: 373 Size: 200 50 199 Position: 0 0 439 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x3A 0x39 0x38 0x36 0x35 0x3B 0x3A 0x36 0x37 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#374, 0)) { ccel (me, 1)=2; write (&ypos (#374))=ysize (me)/5; while (mouseb) waitf; waitf; if (!#368.function) #368.function=2; ccel (me, 1)=1; write (&ypos (#374))=ysize (me); clrtrig (me, 0); clrtrig (#374, 0); } end End_Chunk Children: ; ;-------Object 374------------------------------------------------------- ; Chunk: Standard Name: "ICON[141]" Number: 374 Size: 48 0 11 Position: 78 50 92 Type: 100 Layer: 0 End_Chunk Chunk: Colours Number: 1 0x15 End_Chunk End_Children ; ;-------Object 375------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[142]" Number: 375 Size: 200 50 199 Position: 220 0 439 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x3A 0x39 0x38 0x36 0x35 0x3B 0x3A 0x36 0x37 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#376, 0)) { ccel (me, 1)=2; write (&ypos (#376))=ysize (me)/5; while (mouseb) waitf; waitf; if (!#368.function) #368.function=4; ccel (me, 1)=1; write (&ypos (#376))=ysize (me); clrtrig (me, 0); clrtrig (#376, 0); } end End_Chunk Children: ; ;-------Object 376------------------------------------------------------- ; Chunk: Standard Name: "ICON[143]" Number: 376 Size: 55 0 133 Position: 75 50 33 Type: 107 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x02 0x15 End_Chunk End_Children ; ;-------Object 377------------------------------------------------------- ; Chunk: Standard Name: "BUTTON[144]" Number: 377 Size: 200 50 199 Position: 220 0 0 Type: 91 Layer: 0 OFlags: Aa End_Chunk Chunk: Colours Number: 9 0x3A 0x39 0x38 0x36 0x35 0x3B 0x3A 0x36 0x37 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 2 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL resume (0, 2); if (activate (me, 0) || activate (#378, 0)) { ccel (me, 1)=2; write (&ypos (#378))=ysize (me)/5; while (mouseb) waitf; waitf; if (!#368.function) #368.function=99; ccel (me, 1)=1; write (&ypos (#378))=ysize (me); clrtrig (me, 0); clrtrig (#378, 0); } end End_Chunk Children: ; ;-------Object 378------------------------------------------------------- ; Chunk: Standard Name: "ICON[145]" Number: 378 Size: 99 0 47 Position: 52 50 77 Type: 108 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x00 0x15 0x15 End_Chunk End_Children End_Children ; ;-------Object 379------------------------------------------------------- ; Chunk: Standard Name: "function[22]" Number: 379 Size: 420 50 639 Position: 810 50 112 Type: 109 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 6 0x37 0x3B 0x3A 0x36 0x38 0x00 End_Chunk Chunk: SCL short function, sf; if (function) { #381.cv=atof (#381.con); if (sf) { switch (sf); case 1: #381.cv=#381.lv+#381.cv; case 2: #381.cv=#381.lv-#381.cv; case 3: #381.cv=#381.lv*#381.cv; case 4: #381.cv=#381.lv/#381.cv; } #381.which=0; #381.lv=#381.cv; ftoa (#381.con, #381.lv); sf=function; function=0; } end End_Chunk ; ;-------Object 380------------------------------------------------------- ; Chunk: Standard Name: "back-clope[146]" Number: 380 Size: 1360 500 412 Position: 0 0 1059 Type: 110 Layer: 0 End_Chunk Chunk: Attachments Number: 1 Facet: 26 Object: 381 End_Chunk ; ;-------Object 381------------------------------------------------------- ; Chunk: Standard Name: "control[147]" Number: 381 Size: 1000 20 219 Position: 180 98 1143 Type: 111 Layer: 0 DFlags: r OFlags: Aa End_Chunk Chunk: Rotations Initial: 0x18E3 0x0000 0x0000 Centre: 600 10 0 End_Chunk Chunk: Colours Number: 15 0x46 0x47 0x47 0x48 0x75 0x76 0x76 0x4F 0x4D 0x46 0x45 0x4C 0x4F 0x45 0x46 End_Chunk Chunk: SCL float cv, lv; char *con; short which, whato; con=" 0\0 \0 "; if (first) strcpy (#381.con, " 0"); ccel (#388, 1)=17; ccel (#389, 1)=17; ccel (#390, 1)=17; ccel (#383, 1)=17; ccel (#384, 1)=17; ccel (#385, 1)=17; ccel (#391, 1)=17; ccel (#392, 1)=17; /* the above resets all digets to blank */ repeat (strlen (con)) { whato=table (7-strlen (con)+inloop) {#388, #389, #390, #383, #384, #385, #391, #392}; if (con[inloop-1]<48 || con[inloop-1]>57) { if (con[inloop-1]==46) /* If the current digit is not a number */ ccel (object (whato), 1)=18; /* then check for a '.' /* else cframe (object (whato), 1)=17; /* else make the diget blank */ } else ccel (object (whato), 1)=con[inloop-1]-47; /* else the asci value is numerical so set the diget acordingly */ } /* The above works out the length of the string 'con' which contains the value selected by the user when pressing the numeric buttons. It then sets each relevent animation for each relevent digit. */ end End_Chunk Children: ; ;-------Object 382------------------------------------------------------- ; Chunk: Standard Name: "eight digit display[148]" Number: 382 Size: 858 0 112 Position: 83 0 52 Type: 65535 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 0 End_Chunk Children: ; ;-------Object 383------------------------------------------------------- ; Chunk: Standard Name: "digit[149]" Number: 383 Size: 83 0 112 Position: 325 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 384------------------------------------------------------- ; Chunk: Standard Name: "digit[150]" Number: 384 Size: 83 0 112 Position: 433 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 385------------------------------------------------------- ; Chunk: Standard Name: "digit[151]" Number: 385 Size: 83 0 112 Position: 541 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 388------------------------------------------------------- ; Chunk: Standard Name: "digit[152]" Number: 388 Size: 83 0 112 Position: 0 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 389------------------------------------------------------- ; Chunk: Standard Name: "digit[153]" Number: 389 Size: 83 0 112 Position: 108 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 390------------------------------------------------------- ; Chunk: Standard Name: "digit[154]" Number: 390 Size: 83 0 112 Position: 216 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 391------------------------------------------------------- ; Chunk: Standard Name: "digit[155]" Number: 391 Size: 83 0 112 Position: 650 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x1100 Velocity: 0x0100 Mode: 0 End_Chunk ; ;-------Object 392------------------------------------------------------- ; Chunk: Standard Name: "digit[156]" Number: 392 Size: 83 0 112 Position: 758 0 0 Type: 112 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 18 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk End_Children End_Children End_Children ; ;-------Object 13------------------------------------------------------- ; Chunk: Standard Name: "bitsnbobs" Number: 13 Size: 8000 2000 5000 Position: 1585 0 323 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 39------------------------------------------------------- ; Chunk: Standard Name: "showoff" Number: 39 Size: 3000 2000 3000 Position: 1519 0 1462 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFF8E38 0x0000 Centre: 1500 1000 1500 End_Chunk Children: ; ;-------Object 40------------------------------------------------------- ; Chunk: Standard Name: "notesheet" Number: 40 Size: 3000 0 1700 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x15 0x00 End_Chunk ; ;-------Object 57------------------------------------------------------- ; Chunk: Standard Name: "writinghold" Number: 57 Size: 2000 2000 2000 Position: 530 0 230 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 189------------------------------------------------------- ; Chunk: Standard Name: "pencilsort" Number: 189 Size: 1900 2000 2000 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 74------------------------------------------------------- ; Chunk: Standard Name: "pencil" Number: 74 Size: 1620 100 100 Position: 127 0 384 Type: 28 Layer: 0 End_Chunk Chunk: InitPos Position: 127 0 384 End_Chunk Chunk: Dynamics MovType: 0x00000000 Fuel: 0 Climb: 0 Gravity: 98 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL long start, line, rubber, seq; /* if activated then start the relevent sequence. rotate to vertical write 'spaceball' rotate to horizontal rotate to vertical erase 'spaceball' rotate to horizontal */ if (seq==1) { zrot (me)+=1; if (zrot (me)==0) seq=2; } if (start==68 && seq==0) seq=1; if (activate (me, 0)) { if (rubber==0 && start==0) { rubber=1; start=1; } if (rubber==1 && start>67) { rubber=0; start=68; /* rotating sequence */ } } if (zrot (me)>-90 && start==1 && seq==0) { zrot (me)-=1; zpos (me)-=zpos (me)/20; xpos (me)-=xpos (me)/20; } if (seq==2 && zrot (me)>-90 && rubber==0) { zrot (me)-=1; xrot (me)+=2; ypos (me)+=18; } if (seq==3) { zrot (me)+=1; xrot (me)-=2; ypos (me)-=18; if (zrot (me)==0) { seq=0; start=0; rubber=0; /* drawing-erasing sequence *//* these three tables contain values for the x/z point positions and facet(line) numbers that make up the shape 'spaceball'. The pencil traces these points and colours the relevent lines */ } } if (zrot (me)<-90) { zpos (me)=5*table (start) {0, 26, 12, 5, 3, 12, 22, 27, 22, 12, 0, 34, 34, 34, 45, 52, 59, 60, 48, 41, 99, 83, 73, 67, 66, 71, 79, 95, 93, 125, 123, 118, 106, 100, 104, 111, 121, 137, 153, 154, 146, 137, 130, 130, 135, 142, 151, 161, 161, 165, 175, 182, 186, 180, 172, 158, 224, 208, 198, 193, 191, 196, 205, 220, 219, 229, 229, 240, 240}; xpos (me)=5*table (start) {0, 7, 7, 12, 20, 25, 29, 35, 45, 50, 50, 17, 67, 32, 20, 18, 21, 35, 48, 50, 17, 18, 23, 31, 45, 50, 50, 23, 50, 26, 20, 18, 25, 35, 46, 50, 46, 39, 29, 21, 17, 21, 32, 45, 50, 50, 46, 0, 43, 28, 18, 18, 31, 42, 48, 50, 17, 18, 23, 31, 45, 50, 50, 23, 50, 0, 50, 0, 50}; line=table (start) {0, 50, 50, 50, 51, 52, 53, 54, 55, 56, 57, 58, 49, 49, 48, 47, 46, 45, 44, 43, 43, 41, 40, 39, 38, 37, 36, 35, 34, 34, 33, 32, 31, 30, 29, 28, 27, 27, 26, 25, 24, 23, 22, 21, 20, 19, 18, 18, 17, 16, 15, 14, 13, 12, 11, 10, 10, 9, 8, 7, 42, 6, 5, 4, 3, 3, 2, 2, 1, 1}; if (rubber==1) setcol (1, line, #56); /* writing */ if (rubber==0) setcol (0, line, #56); /* rubbing out */ if (start<68 && rubber==1) start+=1; if (start>1 && rubber==0) start-=1; if (start==1 && rubber==0 && seq==2) seq=3; } end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 0 0 End_Chunk ; ;-------Object 191------------------------------------------------------- ; Chunk: Standard Name: "lettersort[191]" Number: 191 Size: 500 0 1200 Position: -60 -50 50 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 192------------------------------------------------------- ; Chunk: Standard Name: "write[192]" Number: 192 Size: 250 500 1200 Position: 0 50 0 Type: 34 Layer: 0 End_Chunk Chunk: Default Colours Number: 60 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 End_Chunk Chunk: Colours Number: 60 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 End_Chunk End_Children End_Children ; ;-------Object 58------------------------------------------------------- ; Chunk: Standard Name: "lettersort" Number: 58 Size: 500 0 1200 Position: -60 -50 50 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 56------------------------------------------------------- ; Chunk: Standard Name: "write" Number: 56 Size: 250 500 1200 Position: 0 50 0 Type: 34 Layer: 0 End_Chunk Chunk: Default Colours Number: 60 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 End_Chunk Chunk: Colours Number: 60 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00 End_Chunk End_Children End_Children End_Children ; ;-------Object 47------------------------------------------------------- ; Chunk: Standard Name: "phone[47]" Number: 47 Size: 2200 900 1900 Position: 5564 0 376 Type: 65535 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 4 End_Chunk Chunk: SCL long ring, once=0; resume (0, 2); /* The phone will randomly call. It will ring 20 times but will only call once . Activating the base of the most detailed phone will cause the ringing to stop. The optional midi sampler is needed for this condition */ if (activate (#60, 0) && ring>1) ring=0; if (random (10000)<50 && once==0) { ring=20; once=1; /* play sample, and flash red indicator on phone. The sampled sound is distanced automatically by superscape. The value -6000 creates a maximum volume at the distance of 6000 units. A +ve value would create a constant volume. */ } if (ring>0) { sound (1, 59, -6000, 5); unkill (#29); repeat (30) waitf; sound (1, 59, 0, 5); kill (#29); invis (#29); ring-=1; } if (ring==0 && vis? (me)) { invis (#29); kill (#29); sound (1, 59, 0, 5); } end End_Chunk Children: ; ;-------Object 60------------------------------------------------------- ; Chunk: Standard Name: "phonebase[60]" Number: 60 Size: 2200 700 1900 Position: 0 0 0 Type: 17 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 1500 Invisible: 1593 Replace: 61 End_Chunk Chunk: Attachments Number: 2 Facet: 1 Object: 172 Facet: 1 Object: 18 End_Chunk ; ;-------Object 61------------------------------------------------------- ; Chunk: Standard Name: "phonerep1[61]" Number: 61 Size: 2200 700 1900 Position: 0 0 0 Type: 35 Layer: 0 DFlags: R OFlags: ri End_Chunk Chunk: Distancing Visible: 2000 Invisible: 2125 Replace: 169 End_Chunk Chunk: Attachments Number: 1 Facet: 1 Object: 172 End_Chunk ; ;-------Object 169------------------------------------------------------- ; Chunk: Standard Name: "phonerep2[169]" Number: 169 Size: 2200 700 1900 Position: 0 0 0 Type: 36 Layer: 0 DFlags: R OFlags: ri End_Chunk Chunk: Distancing Visible: 3000 Invisible: 3187 Replace: 170 End_Chunk Chunk: Attachments Number: 1 Facet: 1 Object: 172 End_Chunk ; ;-------Object 170------------------------------------------------------- ; Chunk: Standard Name: "phonerep3[170]" Number: 170 Size: 2200 700 1900 Position: 0 0 0 Type: 37 Layer: 0 DFlags: R OFlags: ri End_Chunk Chunk: Distancing Visible: 4000 Invisible: 4250 Replace: 171 End_Chunk Chunk: Attachments Number: 1 Facet: 1 Object: 172 End_Chunk ; ;-------Object 171------------------------------------------------------- ; Chunk: Standard Name: "phonerep4[171]" Number: 171 Size: 2200 700 1900 Position: 0 0 0 Type: 38 Layer: 0 DFlags: R OFlags: i End_Chunk Chunk: Attachments Number: 1 Facet: 1 Object: 172 End_Chunk ; ;-------Object 172------------------------------------------------------- ; Chunk: Standard Name: "handset[172]" Number: 172 Size: 2000 200 300 Position: -150 490 1350 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 173------------------------------------------------------- ; Chunk: Standard Name: "phone handset" Number: 173 Size: 2200 330 870 Position: 170 -200 -300 Type: 23 Layer: 0 End_Chunk Chunk: SCL /* if activated, then 1. stop phone ring. 2. move & rotate handset. 3. replace handset. */ resume (2, 2); if (activate (me, 0)) { /* ################# stop phone ring ################## */ #47.ring=0; /* ################ rotate handset for 3 frames ################## */ repeat (3) { xrot (me)+=3; waitf; } /* ############# rotate & move handset for 3 frames ############### */ repeat (3) { write (&ypos (me))+=100; xrot (me)+=3; zrot (me)-=10; waitf; } /* ############# replace handset in origonal position ########### */ write (&ypos (me))-=300; waitf; xrot (me)=ixrot (me); zrot (me)=izrot (me); clrtrig (me, 0); } end End_Chunk Chunk: InitPos Position: 170 -200 -300 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0xFFFFF830 Centre: 110 16 43 End_Chunk End_Children ; ;-------Object 11------------------------------------------------------- ; Chunk: Standard Name: "buttons[11]" Number: 11 Size: 505 200 675 Position: 420 400 190 Type: 65535 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 2000 Invisible: 2125 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0xFFFFF82D Centre: 252 100 337 End_Chunk Children: ; ;-------Object 16------------------------------------------------------- ; Chunk: Standard Name: "but*[16]" Number: 16 Size: 100 50 170 Position: 0 0 0 Type: 65 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=7; animode (me, 1)=6; ccel (me, 1)=4; #47.ring=0; } if (length>0) length-=1; end End_Chunk ; ;-------Object 17------------------------------------------------------- ; Chunk: Standard Name: "6but[17]" Number: 17 Size: 100 50 170 Position: 270 0 0 Type: 66 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 76, 30, 2); sound (2, 65, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 76, 0, 2); sound (2, 65, 0, 2); } end End_Chunk ; ;-------Object 24------------------------------------------------------- ; Chunk: Standard Name: "9but[24]" Number: 24 Size: 100 50 170 Position: 135 0 0 Type: 67 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 76, 30, 2); sound (2, 67, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 76, 0, 2); sound (2, 67, 0, 2); } end End_Chunk ; ;-------Object 25------------------------------------------------------- ; Chunk: Standard Name: "3but[25]" Number: 25 Size: 100 50 170 Position: 405 0 0 Type: 68 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; resume (2, 2); /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 76, 30, 2); sound (2, 64, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 76, 0, 2); sound (2, 64, 0, 2); } end End_Chunk ; ;-------Object 26------------------------------------------------------- ; Chunk: Standard Name: "0but[26]" Number: 26 Size: 100 50 170 Position: 0 0 259 Type: 3 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 74, 30, 2); sound (2, 68, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 74, 0, 2); sound (2, 68, 0, 2); } end End_Chunk ; ;-------Object 29------------------------------------------------------- ; Chunk: Standard Name: "ringing[29]" Number: 29 Size: 20 0 170 Position: -150 1 259 Type: 0 Layer: 0 OFlags: Ii End_Chunk Chunk: SCL resume (1, 1); togvis (me); waitf; end End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x0B 0x00 End_Chunk ; ;-------Object 18------------------------------------------------------- ; Chunk: Standard Name: "ringing[18]" Number: 18 Size: 20 0 170 Position: -150 0 259 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x03 0x00 End_Chunk ; ;-------Object 96------------------------------------------------------- ; Chunk: Standard Name: "8but[96]" Number: 96 Size: 100 50 170 Position: 135 0 260 Type: 69 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; resume (2, 2); /* see button 1 for description */ if (activate (me, 0)) { animode (me, 1)=6; ccel (me, 1)=4; waitfs (2); sound (1, 74, 30, 2); sound (2, 67, 30, 2); waitfs (2); } end End_Chunk ; ;-------Object 97------------------------------------------------------- ; Chunk: Standard Name: "5but[97]" Number: 97 Size: 100 50 170 Position: 270 0 260 Type: 70 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 74, 30, 2); sound (2, 65, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 74, 0, 2); sound (2, 65, 0, 2); } end End_Chunk ; ;-------Object 98------------------------------------------------------- ; Chunk: Standard Name: "2but[98]" Number: 98 Size: 100 50 170 Position: 405 0 260 Type: 71 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 74, 30, 2); sound (2, 64, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 74, 0, 2); sound (2, 64, 0, 2); } end End_Chunk ; ;-------Object 99------------------------------------------------------- ; Chunk: Standard Name: "but#[99]" Number: 99 Size: 100 50 170 Position: 0 0 505 Type: 65 Layer: 0 OFlags: Aa End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=7; animode (me, 1)=6; ccel (me, 1)=4; #47.ring=20; } if (length>0) length-=1; end End_Chunk ; ;-------Object 100------------------------------------------------------- ; Chunk: Standard Name: "7but[100]" Number: 100 Size: 100 50 170 Position: 135 0 505 Type: 72 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 73, 30, 2); sound (2, 67, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 73, 0, 2); sound (2, 67, 0, 2); } end End_Chunk ; ;-------Object 101------------------------------------------------------- ; Chunk: Standard Name: "4but[101]" Number: 101 Size: 100 50 170 Position: 270 0 505 Type: 73 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* see button 1 for description */ if (activate (me, 0) && length==0) { length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 73, 30, 2); sound (2, 65, 30, 2); } if (length>0) length-=1; if (length==1) { sound (1, 73, 0, 2); sound (2, 65, 0, 2); } end End_Chunk ; ;-------Object 102------------------------------------------------------- ; Chunk: Standard Name: "1but[102]" Number: 102 Size: 100 50 170 Position: 405 0 505 Type: 2 Layer: 0 OFlags: Aa End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 7 Index: 2 Sound: 6 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 4 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: SCL long length; /* When activated, the button depresses and plays a sample (if the optional midi sampler is fitted). *//* length is used to prevent the re-activation of the button for 8 frames */ if (activate (me, 0) && length==0) { /* Plays the animation defined in the shape showing the button pushing in and then out. Plays sampled tone at set volume. */ length=8; animode (me, 1)=6; ccel (me, 1)=4; sound (1, 73, 30, 2); sound (2, 64, 30, 2); } if (length>0) length-=1; /* turns sound off 7 frames after selecting */ if (length==1) { sound (1, 73, 0, 2); sound (2, 64, 0, 2); } end End_Chunk End_Children End_Children End_Children ; ;-------Object 14------------------------------------------------------- ; Chunk: Standard Name: "bitsnbobs[14]" Number: 14 Size: 6000 2000 9000 Position: 1000 0 5994 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 78------------------------------------------------------- ; Chunk: Standard Name: "bookgroup[78]" Number: 78 Size: 2000 170 1400 Position: 2370 0 5860 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x238E 0x0000 Centre: 130 10 85 End_Chunk Children: ; ;-------Object 77------------------------------------------------------- ; Chunk: Standard Name: "book[77]" Number: 77 Size: 1800 120 1200 Position: 100 50 100 Type: 27 Layer: 0 End_Chunk Chunk: Colours Number: 13 0x16 0x15 0x11 0x15 0x16 0x17 0x15 0x12 0x13 0x14 0x14 0x13 0x10 End_Chunk ; ;-------Object 76------------------------------------------------------- ; Chunk: Standard Number: 76 Size: 2000 50 1400 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x6E 0x6D 0x6B 0x6B 0x6C 0x6F End_Chunk End_Children ; ;-------Object 75------------------------------------------------------- ; Chunk: Standard Name: "blottingpad" Number: 75 Size: 5000 0 3500 Position: 121 0 4750 Type: 26 Layer: 0 DFlags: r End_Chunk Chunk: Attachments Number: 2 Facet: 5 Object: 40 Facet: 2 Object: 40 End_Chunk Chunk: Rotations Initial: 0x0000 0x2AAA 0x0000 Centre: 225 2 125 End_Chunk ; ;-------Object 205------------------------------------------------------- ; Chunk: Standard Name: "nameplategroup" Number: 205 Size: 4000 600 600 Position: 887 0 7568 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 204------------------------------------------------------- ; Chunk: Standard Name: "nameplate" Number: 204 Size: 4000 600 600 Position: 0 0 0 Type: 1 Layer: 0 End_Chunk Children: ; ;-------Object 194------------------------------------------------------- ; Chunk: Standard Name: "dimension[194]" Number: 194 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 2000 Invisible: 2125 Replace: 207 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 195------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[195]" Number: 195 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x19 0x19 0x19 0x19 0x19 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 196------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[196]" Number: 196 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 End_Chunk ; ;-------Object 197------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[197]" Number: 197 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x15 0x00 End_Chunk ; ;-------Object 198------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[198]" Number: 198 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x13 0x00 End_Chunk ; ;-------Object 199------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[199]" Number: 199 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x11 0x11 0x10 0x11 0x11 0x00 End_Chunk ; ;-------Object 200------------------------------------------------------- ; Chunk: Standard Name: "e(phone[200]" Number: 200 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x13 0x13 0x13 0x13 End_Chunk ; ;-------Object 201------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[201]" Number: 201 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x15 0x15 0x15 0x15 0x15 0x15 End_Chunk ; ;-------Object 202------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[202]" Number: 202 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x17 0x00 End_Chunk ; ;-------Object 203------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[203]" Number: 203 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x19 0x19 0x19 0x19 0x19 0x19 End_Chunk End_Children ; ;-------Object 207------------------------------------------------------- ; Chunk: Standard Name: "dimension[207]" Number: 207 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 3000 Invisible: 3187 Replace: 217 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 208------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[208]" Number: 208 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1D 0x1D 0x1D 0x1D 0x1D 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 209------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[209]" Number: 209 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x1B 0x1B 0x1B 0x1B 0x1B 0x1B 0x1B 0x1B End_Chunk ; ;-------Object 210------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[210]" Number: 210 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x19 0x00 End_Chunk ; ;-------Object 211------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[211]" Number: 211 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x17 0x00 End_Chunk ; ;-------Object 212------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[212]" Number: 212 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x15 0x15 0x15 0x15 0x15 0x00 End_Chunk ; ;-------Object 213------------------------------------------------------- ; Chunk: Standard Name: "e(phone[213]" Number: 213 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x17 0x17 0x17 0x17 End_Chunk ; ;-------Object 214------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[214]" Number: 214 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x19 0x19 0x19 0x19 0x19 0x19 End_Chunk ; ;-------Object 215------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[215]" Number: 215 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x1A 0x00 End_Chunk ; ;-------Object 216------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[216]" Number: 216 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1C 0x1C 0x1C 0x1C 0x1C 0x1C End_Chunk End_Children ; ;-------Object 217------------------------------------------------------- ; Chunk: Standard Name: "dimension[217]" Number: 217 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 4000 Invisible: 4250 Replace: 227 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 218------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[218]" Number: 218 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1F 0x1F 0x1F 0x1F 0x1F 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 219------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[219]" Number: 219 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x1D 0x1D 0x1D 0x1D 0x1D 0x1D 0x1D 0x1D End_Chunk ; ;-------Object 220------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[220]" Number: 220 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x1B 0x00 End_Chunk ; ;-------Object 221------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[221]" Number: 221 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x19 0x00 End_Chunk ; ;-------Object 222------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[222]" Number: 222 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x17 0x17 0x17 0x17 0x17 0x00 End_Chunk ; ;-------Object 223------------------------------------------------------- ; Chunk: Standard Name: "e(phone[223]" Number: 223 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x19 0x19 0x19 0x19 End_Chunk ; ;-------Object 224------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[224]" Number: 224 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1B 0x1B 0x1B 0x1B 0x1B 0x1B End_Chunk ; ;-------Object 225------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[225]" Number: 225 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x1D 0x00 End_Chunk ; ;-------Object 226------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[226]" Number: 226 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1F 0x1F 0x1F 0x1F 0x1F 0x1F End_Chunk End_Children ; ;-------Object 227------------------------------------------------------- ; Chunk: Standard Name: "dimension[227]" Number: 227 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 237 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 228------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[228]" Number: 228 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x22 0x22 0x22 0x22 0x22 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 229------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[229]" Number: 229 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 End_Chunk ; ;-------Object 230------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[230]" Number: 230 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x1F 0x00 End_Chunk ; ;-------Object 231------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[231]" Number: 231 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E 0x00 End_Chunk ; ;-------Object 232------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[232]" Number: 232 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1C 0x1C 0x1C 0x1C 0x1C 0x00 End_Chunk ; ;-------Object 233------------------------------------------------------- ; Chunk: Standard Name: "e(phone[233]" Number: 233 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x1D 0x1D 0x1D 0x1D End_Chunk ; ;-------Object 234------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[234]" Number: 234 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1E 0x1E 0x1E 0x1E 0x1E 0x1E End_Chunk ; ;-------Object 235------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[235]" Number: 235 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x20 0x00 End_Chunk ; ;-------Object 236------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[236]" Number: 236 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x22 0x22 0x22 0x22 0x22 0x22 End_Chunk End_Children ; ;-------Object 237------------------------------------------------------- ; Chunk: Standard Name: "dimension[237]" Number: 237 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 6000 Invisible: 6375 Replace: 247 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 238------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[238]" Number: 238 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x23 0x23 0x23 0x23 0x23 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 239------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[239]" Number: 239 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 End_Chunk ; ;-------Object 240------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[240]" Number: 240 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x21 0x00 End_Chunk ; ;-------Object 241------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[241]" Number: 241 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x00 End_Chunk ; ;-------Object 242------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[242]" Number: 242 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x1F 0x1F 0x1F 0x1F 0x1F 0x00 End_Chunk ; ;-------Object 243------------------------------------------------------- ; Chunk: Standard Name: "e(phone[243]" Number: 243 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x20 0x20 0x20 0x20 End_Chunk ; ;-------Object 244------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[244]" Number: 244 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x21 0x21 0x21 0x21 0x21 0x21 End_Chunk ; ;-------Object 245------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[245]" Number: 245 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x22 0x00 End_Chunk ; ;-------Object 246------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[246]" Number: 246 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x23 0x23 0x23 0x23 0x23 0x23 End_Chunk End_Children ; ;-------Object 247------------------------------------------------------- ; Chunk: Standard Name: "dimension[247]" Number: 247 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 38 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 248------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[248]" Number: 248 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 249------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[249]" Number: 249 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 End_Chunk ; ;-------Object 250------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[250]" Number: 250 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x23 0x00 End_Chunk ; ;-------Object 251------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[251]" Number: 251 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x22 0x00 End_Chunk ; ;-------Object 252------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[252]" Number: 252 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x22 0x22 0x22 0x22 0x22 0x00 End_Chunk ; ;-------Object 253------------------------------------------------------- ; Chunk: Standard Name: "e(phone[253]" Number: 253 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x22 0x22 0x22 0x22 End_Chunk ; ;-------Object 254------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[254]" Number: 254 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x23 0x23 0x23 0x23 0x23 0x23 End_Chunk ; ;-------Object 255------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[255]" Number: 255 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x24 0x00 End_Chunk ; ;-------Object 256------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[256]" Number: 256 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk End_Children ; ;-------Object 38------------------------------------------------------- ; Chunk: Standard Name: "dimension[38]" Number: 38 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 8000 Invisible: 8500 Replace: 150 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 41------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[41]" Number: 41 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 59------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[59]" Number: 59 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk ; ;-------Object 80------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[80]" Number: 80 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x25 0x00 End_Chunk ; ;-------Object 103------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[103]" Number: 103 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x24 0x00 End_Chunk ; ;-------Object 104------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[104]" Number: 104 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x23 0x23 0x23 0x23 0x23 0x00 End_Chunk ; ;-------Object 146------------------------------------------------------- ; Chunk: Standard Name: "e(phone[146]" Number: 146 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x24 0x24 0x24 0x24 End_Chunk ; ;-------Object 147------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[147]" Number: 147 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x24 0x24 0x24 0x24 0x24 End_Chunk ; ;-------Object 148------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[148]" Number: 148 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x25 0x00 End_Chunk ; ;-------Object 149------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[149]" Number: 149 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk End_Children ; ;-------Object 150------------------------------------------------------- ; Chunk: Standard Name: "dimension[150]" Number: 150 Size: 3550 320 0 Position: 230 200 235 Type: 65535 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 0 End_Chunk Chunk: Rotations Initial: 0xFFFFF05B 0x0000 0x0000 Centre: 1775 160 0 End_Chunk Children: ; ;-------Object 151------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[151]" Number: 151 Size: 430 320 0 Position: 3085 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 215 160 0 End_Chunk ; ;-------Object 152------------------------------------------------------- ; Chunk: Standard Name: "o(phone)[152]" Number: 152 Size: 420 320 0 Position: 2610 0 0 Type: 44 Layer: 0 End_Chunk Chunk: Colours Number: 8 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk ; ;-------Object 153------------------------------------------------------- ; Chunk: Standard Name: "i2(phone)[153]" Number: 153 Size: 100 320 0 Position: 2460 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x25 0x00 End_Chunk ; ;-------Object 154------------------------------------------------------- ; Chunk: Standard Name: "s(phone)[154]" Number: 154 Size: 360 320 0 Position: 2050 0 0 Type: 45 Layer: 0 End_Chunk Chunk: Colours Number: 14 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x25 0x00 End_Chunk ; ;-------Object 155------------------------------------------------------- ; Chunk: Standard Name: "n(phone)[155]" Number: 155 Size: 430 320 0 Position: 1565 0 0 Type: 43 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x00 End_Chunk ; ;-------Object 156------------------------------------------------------- ; Chunk: Standard Name: "e(phone[156]" Number: 156 Size: 350 320 0 Position: 1175 0 0 Type: 40 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x25 0x25 0x25 0x25 End_Chunk ; ;-------Object 157------------------------------------------------------- ; Chunk: Standard Name: "m(phone)[157]" Number: 157 Size: 520 320 0 Position: 600 0 0 Type: 42 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk ; ;-------Object 158------------------------------------------------------- ; Chunk: Standard Name: "i(phone)[158]" Number: 158 Size: 100 320 0 Position: 450 0 0 Type: 41 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x25 0x00 End_Chunk ; ;-------Object 159------------------------------------------------------- ; Chunk: Standard Name: "d(phone)[159]" Number: 159 Size: 400 320 10 Position: 0 0 0 Type: 39 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x25 0x25 0x25 0x25 0x25 0x25 End_Chunk End_Children ; ;-------Object 206------------------------------------------------------- ; Chunk: Standard Name: "pencil2" Number: 206 Size: 1700 100 100 Position: 900 70 30 Type: 28 Layer: 0 End_Chunk End_Children End_Children End_Children End_Children ; ;-------Object 124------------------------------------------------------- ; Chunk: Standard Name: "wholestore(small)[124]" Number: 124 Size: 9820 15000 9500 Position: 56385 0 62597 Type: 65535 Layer: 0 End_Chunk Chunk: Collision Number: 1 SubChunk Offset: 0 0 3500 Size: 9280 15000 6000 End_Chunk Children: ; ;-------Object 125------------------------------------------------------- ; Chunk: Standard Name: "openingrep(small)[125]" Number: 125 Size: 9820 15000 9500 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 126------------------------------------------------------- ; Chunk: Standard Name: "storetop(small)[126]" Number: 126 Size: 9820 365 5500 Position: 0 14634 4000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x54 0x55 0x00 0x53 0x55 End_Chunk ; ;-------Object 127------------------------------------------------------- ; Chunk: Standard Name: "rot[127]" Number: 127 Size: 4900 13902 550 Position: 4920 731 3700 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 4900 0 550 End_Chunk Children: ; ;-------Object 128------------------------------------------------------- ; Chunk: Standard Name: "df(smallleft)[128]" Number: 128 Size: 4900 13902 250 Position: 0 0 300 Type: 15 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 End_Chunk Chunk: SCL long select, ballsel, tempy, inrot, dir, bang; resume (0, 2); if (dir==0) dir=2; if (activate (me, 0)) { if (mouseb==0) { dir=dir*-1; ballsel=1; } else { select=1; if (tempy==0) { tempy=mousey; inrot=yrot (#127); } } } if (mouseb==0 && tempy!=0) { tempy=0; select=0; } if (select==1) { yrot (#127)=inrot- (mousey-tempy)/2; if (yrot (#127)>0) yrot (#127)=0; if (yrot (#127)<-100) yrot (#127)=-100; } if (ballsel==1) { yrot (#127)+=dir; if (yrot (#127)>0) { yrot (#127)=0; ballsel=0; } if (yrot (#127)<-100) { yrot (#127)=-100; ballsel=0; } } if (yrot (#127)<-10) bang=1; if (yrot (#127)==0 && bang==1) { sound (1, 75, -10000, 0); repeat (5) waitf; sound (1, 75, 0, 0); bang=0; } end End_Chunk Chunk: Colours Number: 7 0x53 0x52 0x53 0x52 0x51 0x55 0x54 End_Chunk ; ;-------Object 129------------------------------------------------------- ; Chunk: Standard Name: "sphere[129]" Number: 129 Size: 500 500 300 Position: 500 7317 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 130------------------------------------------------------- ; Chunk: Standard Name: "sphere(most)[130]" Number: 130 Size: 500 500 300 Position: 0 0 0 Type: 79 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 131 End_Chunk ; ;-------Object 131------------------------------------------------------- ; Chunk: Standard Name: "sphere(2nd)[131]" Number: 131 Size: 500 500 300 Position: 0 0 0 Type: 80 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 132 End_Chunk ; ;-------Object 132------------------------------------------------------- ; Chunk: Standard Name: "sphere(3rd)[132]" Number: 132 Size: 500 500 300 Position: 0 0 0 Type: 81 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 133 End_Chunk ; ;-------Object 133------------------------------------------------------- ; Chunk: Standard Name: "sphere(4th)[133]" Number: 133 Size: 500 500 300 Position: 0 0 0 Type: 82 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 11000 Invisible: 11687 Replace: 134 End_Chunk ; ;-------Object 134------------------------------------------------------- ; Chunk: Standard Name: "sphere(5th)[134]" Number: 134 Size: 500 500 300 Position: 0 0 0 Type: 83 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 13000 Invisible: 13812 Replace: 135 End_Chunk ; ;-------Object 135------------------------------------------------------- ; Chunk: Standard Name: "sphere(6th)[135]" Number: 135 Size: 500 500 300 Position: 0 0 0 Type: 84 Layer: 0 DFlags: R OFlags: Ii End_Chunk End_Children End_Children ; ;-------Object 136------------------------------------------------------- ; Chunk: Standard Name: "rot[136]" Number: 136 Size: 4900 13902 550 Position: 0 731 3700 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 0 550 End_Chunk Children: ; ;-------Object 137------------------------------------------------------- ; Chunk: Standard Name: "df(smallright)[137]" Number: 137 Size: 4900 13902 250 Position: 0 0 300 Type: 16 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 End_Chunk Chunk: SCL long select, ballsel, tempy, inrot, dir, bang; resume (0, 2); if (dir==0) dir=-2; if (activate (me, 0)) { if (mouseb==0) { dir=dir*-1; ballsel=1; } else { select=1; if (tempy==0) { tempy=mousey; inrot=yrot (#136); } } } if (mouseb==0 && tempy!=0) { tempy=0; select=0; } if (select==1) { yrot (#136)=inrot+ (mousey-tempy)/2; if (yrot (#136)<0) yrot (#136)=0; if (yrot (#136)>90) yrot (#136)=90; } if (ballsel==1) { yrot (#136)+=dir; if (yrot (#136)<0) { yrot (#136)=0; ballsel=0; } if (yrot (#136)>90) { yrot (#136)=90; ballsel=0; } } if (yrot (#136)>10) bang=1; if (yrot (#136)==0 && bang==1) { sound (1, 75, -10000, 0); repeat (5) waitf; sound (1, 75, 0, 0); bang=0; } end End_Chunk Chunk: Colours Number: 7 0x53 0x52 0x53 0x52 0x51 0x55 0x55 End_Chunk ; ;-------Object 138------------------------------------------------------- ; Chunk: Standard Name: "sphere[138]" Number: 138 Size: 500 500 300 Position: 3900 7317 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 139------------------------------------------------------- ; Chunk: Standard Name: "sphere(most)[139]" Number: 139 Size: 500 500 300 Position: 0 0 0 Type: 79 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 140 End_Chunk ; ;-------Object 140------------------------------------------------------- ; Chunk: Standard Name: "sphere(2nd)[140]" Number: 140 Size: 500 500 300 Position: 0 0 0 Type: 80 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 141 End_Chunk ; ;-------Object 141------------------------------------------------------- ; Chunk: Standard Name: "sphere(3rd)[141]" Number: 141 Size: 500 500 300 Position: 0 0 0 Type: 81 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 142 End_Chunk ; ;-------Object 142------------------------------------------------------- ; Chunk: Standard Name: "sphere(4th)[142]" Number: 142 Size: 500 500 300 Position: 0 0 0 Type: 82 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 11000 Invisible: 11687 Replace: 143 End_Chunk ; ;-------Object 143------------------------------------------------------- ; Chunk: Standard Name: "sphere(5th)[143]" Number: 143 Size: 500 500 300 Position: 0 0 0 Type: 83 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 13000 Invisible: 13812 Replace: 144 End_Chunk ; ;-------Object 144------------------------------------------------------- ; Chunk: Standard Name: "sphere(6th)[144]" Number: 144 Size: 500 500 300 Position: 0 0 0 Type: 84 Layer: 0 DFlags: R OFlags: Ii End_Chunk End_Children End_Children ; ;-------Object 145------------------------------------------------------- ; Chunk: Standard Name: "smallstore[145]" Number: 145 Size: 9820 14634 5250 Position: 0 0 4250 Type: 18 Layer: 0 End_Chunk Chunk: Colours Number: 20 0x00 0x00 0x00 0x57 0x54 0x3E 0x7A 0x00 0x3A 0x36 0x00 0x56 0x56 0x55 0x54 0x54 0x55 0x55 0x57 0xFF End_Chunk End_Children End_Children ; ;-------Object 8------------------------------------------------------- ; Chunk: Standard Name: "wholestore(small)[8]" Number: 8 Size: 9820 15000 9500 Position: 41596 0 62592 Type: 65535 Layer: 0 End_Chunk Chunk: Collision Number: 1 SubChunk Offset: 0 0 3500 Size: 9280 15000 6000 End_Chunk Children: ; ;-------Object 15------------------------------------------------------- ; Chunk: Standard Name: "openingrep(small)[15]" Number: 15 Size: 9820 15000 9500 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 19------------------------------------------------------- ; Chunk: Standard Name: "storetop(small)[19]" Number: 19 Size: 9820 365 5500 Position: 0 14634 4000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x54 0x55 0x00 0x53 0x55 End_Chunk ; ;-------Object 20------------------------------------------------------- ; Chunk: Standard Name: "rot[20]" Number: 20 Size: 4900 13902 550 Position: 4920 731 3700 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 4900 0 550 End_Chunk Children: ; ;-------Object 21------------------------------------------------------- ; Chunk: Standard Name: "df(smallleft)[21]" Number: 21 Size: 4900 13902 250 Position: 0 0 300 Type: 15 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 End_Chunk Chunk: SCL long select, ballsel, tempy, inrot, dir, bang; resume (0, 2); if (dir==0) dir=2; /* if activated */ if (activate (me, 0)) { if (mouseb==0) { dir=dir*-1; ballsel=1; } else { select=1; if (tempy==0) { tempy=mousey; inrot=yrot (#20); } } } if (mouseb==0 && tempy!=0) { tempy=0; select=0; } if (select==1) { yrot (#20)=inrot- (mousey-tempy)/2; if (yrot (#20)>0) yrot (#20)=0; if (yrot (#20)<-100) yrot (#20)=-100; } if (ballsel==1) { yrot (#20)+=dir; if (yrot (#20)>0) { yrot (#20)=0; ballsel=0; } if (yrot (#20)<-100) { yrot (#20)=-100; ballsel=0; } } if (yrot (#20)<-10) bang=1; if (yrot (#20)==0 && bang==1) { sound (1, 75, -10000, 0); repeat (5) waitf; sound (1, 75, 0, 0); bang=0; } end End_Chunk Chunk: Colours Number: 7 0x53 0x52 0x53 0x52 0x51 0x55 0x54 End_Chunk ; ;-------Object 22------------------------------------------------------- ; Chunk: Standard Name: "sphere[22]" Number: 22 Size: 500 500 300 Position: 500 7317 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 23------------------------------------------------------- ; Chunk: Standard Name: "sphere(most)[23]" Number: 23 Size: 500 500 300 Position: 0 0 0 Type: 79 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 62 End_Chunk ; ;-------Object 62------------------------------------------------------- ; Chunk: Standard Name: "sphere(2nd)[62]" Number: 62 Size: 500 500 300 Position: 0 0 0 Type: 80 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 63 End_Chunk ; ;-------Object 63------------------------------------------------------- ; Chunk: Standard Name: "sphere(3rd)[63]" Number: 63 Size: 500 500 300 Position: 0 0 0 Type: 81 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 64 End_Chunk ; ;-------Object 64------------------------------------------------------- ; Chunk: Standard Name: "sphere(4th)[64]" Number: 64 Size: 500 500 300 Position: 0 0 0 Type: 82 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 11000 Invisible: 11687 Replace: 65 End_Chunk ; ;-------Object 65------------------------------------------------------- ; Chunk: Standard Name: "sphere(5th)[65]" Number: 65 Size: 500 500 300 Position: 0 0 0 Type: 83 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 13000 Invisible: 13812 Replace: 66 End_Chunk ; ;-------Object 66------------------------------------------------------- ; Chunk: Standard Name: "sphere(6th)[66]" Number: 66 Size: 500 500 300 Position: 0 0 0 Type: 84 Layer: 0 DFlags: R OFlags: Ii End_Chunk End_Children End_Children ; ;-------Object 67------------------------------------------------------- ; Chunk: Standard Name: "rot[67]" Number: 67 Size: 4900 13902 550 Position: 0 731 3700 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 0 550 End_Chunk Children: ; ;-------Object 69------------------------------------------------------- ; Chunk: Standard Name: "df(smallright)[69]" Number: 69 Size: 4900 13902 250 Position: 0 0 300 Type: 16 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 End_Chunk Chunk: SCL long select, ballsel, tempy, inrot, dir, bang; /* This is complex example of door opening control. This condition detects if the door has been activated by the mouse or by the spaceball. If activated by the spaceball it uses a simple rotate till open/closed. If activated by the mouse the door can be draged open by the desired amount */ resume (0, 2); if (dir==0) dir=-2; if (activate (me, 0)) { /* if activated by spaceball then change direction of open/close */ if (mouseb==0) { dir=dir*-1; ballsel=1; } else { /* if activated by mouse then store the current y positon of mouse and current rotation of door */ select=1; if (tempy==0) { tempy=mousey; inrot=yrot (#67); } } } if (mouseb==0 && tempy!=0) { tempy=0; select=0; /* if mouse button is still depresed then rotate the door relative to the y displacement of the mouse relative to its position when initialy selected */ } if (select==1) { yrot (#67)=inrot+ (mousey-tempy)/2; if (yrot (#67)<0) yrot (#67)=0; if (yrot (#67)>90) yrot (#67)=90; /* if activated by spaceball then rotate till open/closed depending on direction stored in dir */ } if (ballsel==1) { yrot (#67)+=dir; if (yrot (#67)<0) { yrot (#67)=0; ballsel=0; } if (yrot (#67)>90) { yrot (#67)=90; ballsel=0; } } if (yrot (#67)>10) bang=1; if (yrot (#67)==0 && bang==1) { /* (Condition below requires optional midi sampler if door has just been shut then play sample sound. The sound is distanced, with maximum volume being played at a distance of 10000. */ sound (1, 75, -10000, 0); repeat (5) waitf; sound (1, 75, 0, 0); bang=0; } end End_Chunk Chunk: Colours Number: 7 0x53 0x52 0x53 0x52 0x51 0x55 0x5D End_Chunk ; ;-------Object 70------------------------------------------------------- ; Chunk: Standard Name: "sphere[70]" Number: 70 Size: 500 500 300 Position: 3900 7317 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 71------------------------------------------------------- ; Chunk: Standard Name: "sphere(most)[71]" Number: 71 Size: 500 500 300 Position: 0 0 0 Type: 79 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 73 End_Chunk ; ;-------Object 73------------------------------------------------------- ; Chunk: Standard Name: "sphere(2nd)[73]" Number: 73 Size: 500 500 300 Position: 0 0 0 Type: 80 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 79 End_Chunk ; ;-------Object 79------------------------------------------------------- ; Chunk: Standard Name: "sphere(3rd)[79]" Number: 79 Size: 500 500 300 Position: 0 0 0 Type: 81 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 81 End_Chunk ; ;-------Object 81------------------------------------------------------- ; Chunk: Standard Name: "sphere(4th)[81]" Number: 81 Size: 500 500 300 Position: 0 0 0 Type: 82 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 11000 Invisible: 11687 Replace: 82 End_Chunk ; ;-------Object 82------------------------------------------------------- ; Chunk: Standard Name: "sphere(5th)[82]" Number: 82 Size: 500 500 300 Position: 0 0 0 Type: 83 Layer: 0 DFlags: R OFlags: rIi End_Chunk Chunk: Distancing Visible: 13000 Invisible: 13812 Replace: 83 End_Chunk ; ;-------Object 83------------------------------------------------------- ; Chunk: Standard Name: "sphere(6th)[83]" Number: 83 Size: 500 500 300 Position: 0 0 0 Type: 84 Layer: 0 DFlags: R OFlags: Ii End_Chunk End_Children End_Children ; ;-------Object 84------------------------------------------------------- ; Chunk: Standard Name: "smallstore[84]" Number: 84 Size: 9820 14634 5250 Position: 0 0 4250 Type: 18 Layer: 0 End_Chunk Chunk: Colours Number: 20 0x00 0x00 0x00 0x57 0x54 0x3E 0x7A 0x00 0x3A 0x36 0x00 0x56 0x56 0x55 0x54 0x54 0x55 0x55 0x57 0xFF End_Chunk End_Children End_Children ; ;-------Object 107------------------------------------------------------- ; Chunk: Standard Name: "desktype2[107]" Number: 107 Size: 17000 4000 5000 Position: 15994 0 500 Type: 87 Layer: 0 End_Chunk Chunk: Colours Number: 13 0x1F 0x53 0x2F 0x57 0x57 0x56 0x54 0x56 0x56 0x55 0x57 0x53 0x55 End_Chunk ; ;-------Object 260------------------------------------------------------- ; Chunk: Standard Name: "panelhold" Number: 260 Size: 200 2000 1000 Position: 70300 10000 39835 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 262------------------------------------------------------- ; Chunk: Standard Name: "dimmerpanel" Number: 262 Size: 100 2000 1000 Position: 100 0 0 Type: 4 Layer: 0 OFlags: r End_Chunk Chunk: Distancing Visible: 4000 Invisible: 4250 Replace: 265 End_Chunk Chunk: Default Colours Number: 49 0x17 0x16 0x15 0x14 0x13 0x17 0x14 0x16 0x15 0x14 0x13 0x12 0x13 0x13 0x14 0x15 0x16 0x13 0x14 0x15 0x16 0x17 0x18 0x15 0x16 0x17 0x14 0x13 0x13 0x14 0x15 0x19 0x16 0x18 0x17 0x1A 0x10 0x10 0x1F 0x1F 0x14 0x10 0x16 0x10 0x16 0x16 0x13 0x13 0x17 End_Chunk Chunk: Colours Number: 49 0x17 0x16 0x15 0x14 0x13 0x17 0x14 0x16 0x15 0x14 0x13 0x12 0x13 0x13 0x14 0x15 0x16 0x13 0x14 0x15 0x16 0x17 0x18 0x15 0x16 0x17 0x14 0x13 0x13 0x14 0x15 0x19 0x16 0x18 0x17 0x1A 0x10 0x10 0x1F 0x1F 0x14 0x10 0x16 0x10 0x16 0x16 0x13 0x13 0x17 End_Chunk ; ;-------Object 265------------------------------------------------------- ; Chunk: Standard Name: "dimmerpanel[265]" Number: 265 Size: 100 2000 1000 Position: 100 0 0 Type: 4 Layer: 0 DFlags: R OFlags: ri End_Chunk Chunk: Distancing Visible: 5000 Invisible: 5312 Replace: 264 End_Chunk Chunk: Colours Number: 49 0x17 0x16 0x15 0x14 0x13 0x17 0x14 0x16 0x15 0x14 0x13 0x12 0x13 0x13 0x14 0x15 0x16 0x13 0x14 0x15 0x16 0x17 0x18 0x15 0x16 0x17 0x14 0x13 0x13 0x14 0x15 0x19 0x16 0x18 0x17 0x18 0x00 0x00 0x00 0x00 0x13 0x00 0x00 0x00 0x13 0x00 0x13 0x13 0x17 End_Chunk ; ;-------Object 264------------------------------------------------------- ; Chunk: Standard Name: "dimmerpanel[264]" Number: 264 Size: 100 2000 1000 Position: 100 0 0 Type: 5 Layer: 0 DFlags: R OFlags: ri End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 266 End_Chunk Chunk: Colours Number: 49 0x17 0x16 0x15 0x14 0x13 0x17 0x14 0x16 0x15 0x14 0x13 0x12 0x13 0x13 0x14 0x15 0x16 0x13 0x14 0x15 0x16 0x17 0x18 0x15 0x16 0x17 0x14 0x13 0x13 0x14 0x15 0x19 0x16 0x18 0x17 0x15 0x10 0x10 0x1D 0x1C 0x14 0x10 0x16 0x10 0x16 0x16 0x13 0x13 0x17 End_Chunk ; ;-------Object 266------------------------------------------------------- ; Chunk: Standard Name: "dimmerpanel[266]" Number: 266 Size: 100 2000 1000 Position: 100 0 0 Type: 89 Layer: 0 DFlags: R OFlags: i End_Chunk ; ;-------Object 263------------------------------------------------------- ; Chunk: Standard Name: "dshold" Number: 263 Size: 100 200 300 Position: 0 1300 350 Type: 65535 Layer: 0 End_Chunk Chunk: InitPos Position: 0 1300 350 End_Chunk Chunk: Dynamics MovType: 0x80000000 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 261------------------------------------------------------- ; Chunk: Standard Name: "dimswitch" Number: 261 Size: 100 200 300 Position: 0 0 0 Type: 6 Layer: 0 End_Chunk Chunk: SCL unsigned char r[256], g[256], b[256]; short Start=0, once=0, onceonly=0; char rr, gg, bb; long select, tempy, mpos, newr, newg, newb, dimmer, hour, min; /* the array bellow stores the default values of the palette */ resume (0, 2); if (onceonly==0) { fadepal (1, 2, 100); onceonly=1; } if (Start==0) { repeat (256) { Start=inloop-1; getpal (Start, 0, &rr, &gg, &bb); r[Start]=rr; g[Start]=gg; b[Start]=bb; } } if (activate (me, 0)) { /* if activated then store the current y position of the mouse and the current y position of the switch */ select=1; if (tempy==0) { tempy=mousey; mpos=ypos (#263); } } if (mouseb==0 && tempy!=0) { /* if mouse button is no longer depressed then end selection sequence and turn up/down indicator lights off */ tempy=0; select=0; setcol (0x14, 47, #262); setcol (0x14, 48, #262); /* if activated then alter the y position of the switch relative to the displacement of the y position of the mouse (relative to its initial position). */ } if (select==1) { ypos (#263)=mpos- (mousey-tempy)*4; if (ypos (#263)<500) ypos (#263)=500; if (ypos (#263)>1300) ypos (#263)=1300; if (mousey-tempy<0) { /* turns on the up (lighter) indicator light */ setcol (0x4, 48, #262); setcol (0x14, 47, #262); } else { /* turns on the down (darker) indicator light */ if (mousey-tempy>0) { setcol (0x4, 47, #262); setcol (0x14, 48, #262); } } repeat (223) { /* this value indicates how many colour values will be affected by the condition */ Start=inloop+15; /* 15 indicates first colour affected */ dimmer=ypos (#263)-500; /* alters the r.g.b values of the palette entries relative to the y position of the switch */ newr= (r[Start]*dimmer)/800; newg= (g[Start]*dimmer)/800; newb= (b[Start]*dimmer)/800; setpal (Start, 0, newr, newg, newb); } Start=1; /* stores the system clock values, hours and mins. */ } time (&hour, &min, &null); /* every 15 minutes (or on startup) the horzon colours (the last two bands) are altered relative to the time, making the exterior darker or lighter */ if (min==0 || min==15 || min==30 || min==45 || Start==0) { if (once==0) { once=1; repeat (11) { Start=inloop+239; dimmer=8000-limit (cos (hour*15.0000+min/4.0000), -8000, 8000); newr= (r[Start]*dimmer)/16000; newg= (g[Start]*dimmer)/16000; newb= (b[Start]*dimmer)/16000; setpal (Start, 0, newr, newg, newb); } Start=1; } } else once=0; end End_Chunk End_Children End_Children ; ;-------Object 268------------------------------------------------------- ; Chunk: Standard Name: "lightinghold" Number: 268 Size: 10600 400 1000 Position: 44508 23600 22627 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 272------------------------------------------------------- ; Chunk: Standard Name: "lightend2" Number: 272 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 269------------------------------------------------------- ; Chunk: Standard Name: "tube1" Number: 269 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 271------------------------------------------------------- ; Chunk: Standard Name: "tube2" Number: 271 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 273------------------------------------------------------- ; Chunk: Standard Name: "lightend1" Number: 273 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 289------------------------------------------------------- ; Chunk: Standard Name: "lightend1[289]" Number: 289 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 274------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[274]" Number: 274 Size: 10600 400 1000 Position: 16016 23600 22484 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 275------------------------------------------------------- ; Chunk: Standard Name: "lightend2[275]" Number: 275 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 276------------------------------------------------------- ; Chunk: Standard Name: "tube1[276]" Number: 276 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 277------------------------------------------------------- ; Chunk: Standard Name: "tube2[277]" Number: 277 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 278------------------------------------------------------- ; Chunk: Standard Name: "lightend1[278]" Number: 278 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 279------------------------------------------------------- ; Chunk: Standard Name: "lightend1[279]" Number: 279 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 280------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[280]" Number: 280 Size: 10600 400 1000 Position: 16301 23600 45416 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 281------------------------------------------------------- ; Chunk: Standard Name: "lightend2[281]" Number: 281 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 282------------------------------------------------------- ; Chunk: Standard Name: "tube1[282]" Number: 282 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 283------------------------------------------------------- ; Chunk: Standard Name: "tube2[283]" Number: 283 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 284------------------------------------------------------- ; Chunk: Standard Name: "lightend1[284]" Number: 284 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 285------------------------------------------------------- ; Chunk: Standard Name: "lightend1[285]" Number: 285 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 286------------------------------------------------------- ; Chunk: Standard Name: "lightinghold[286]" Number: 286 Size: 10600 400 1000 Position: 44952 23600 45416 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 287------------------------------------------------------- ; Chunk: Standard Name: "lightend2[287]" Number: 287 Size: 300 400 1000 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 288------------------------------------------------------- ; Chunk: Standard Name: "tube1[288]" Number: 288 Size: 10000 350 350 Position: 300 0 50 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 290------------------------------------------------------- ; Chunk: Standard Name: "tube2[290]" Number: 290 Size: 10000 350 350 Position: 300 0 600 Type: 7 Layer: 0 End_Chunk Chunk: Colours Number: 10 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 0x11 End_Chunk ; ;-------Object 291------------------------------------------------------- ; Chunk: Standard Name: "lightend1[291]" Number: 291 Size: 300 400 1000 Position: 10300 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x24 0x20 0x24 0x20 0x00 0x22 End_Chunk ; ;-------Object 292------------------------------------------------------- ; Chunk: Standard Name: "lightend1[292]" Number: 292 Size: 10600 0 1000 Position: 0 400 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x1E End_Chunk End_Children ; ;-------Object 296------------------------------------------------------- ; Chunk: Standard Name: "piccy" Number: 296 Size: 200 6000 4700 Position: 500 9000 48641 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 178------------------------------------------------------- ; Chunk: Standard Name: "canvas[178]" Number: 178 Size: 200 300 4700 Position: 0 5700 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x53 0x53 0x54 0x52 0x55 End_Chunk ; ;-------Object 181------------------------------------------------------- ; Chunk: Standard Name: "canvas[181]" Number: 181 Size: 200 300 4700 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short p=2, a; long z, z2; resume (2, 2); if (activate (me, 0)) { a=1; p+=1; if (p>6) p=2; } if (a==1) { switch (random (3)); case 0: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (me, 10)+=z/z2; tyscale (me, 10)+=z/z2; txoff (me, 10)=-txscale (me, 10)/2+128; tyoff (me, 10)=-tyscale (me, 10)/2+128; waitf; z=z*2; } a=0; timgref (me, 10)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (me, 10)-=z/z2; tyscale (me, 10)-=z/z2; txoff (me, 10)=-txscale (me, 10)/2+128; tyoff (me, 10)=-tyscale (me, 10)/2+128; waitf; } txscale (me, 10)=256; tyscale (me, 10)=256; txoff (me, 10)=0; tyoff (me, 10)=0; } case 1: { z2=random (5)+1; z=1; repeat (8) { txoff (me, 10)-=z; tyoff (me, 10)+=z; waitf; z=z*2; } a=0; timgref (me, 10)=p; clrtrig (me, 0); repeat (8) { txoff (me, 10)-=z; tyoff (me, 10)+=z; waitf; z=z/2; } txoff (me, 10)=256; tyoff (me, 10)=256; } case 2: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (me, 10)+=z/z2; tyscale (me, 10)+=z/z2; waitf; z=z*2; } a=0; timgref (me, 10)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (me, 10)-=z/z2; tyscale (me, 10)-=z/z2; waitf; } txscale (me, 10)=256; tyscale (me, 10)=256; txoff (me, 10)=0; tyoff (me, 10)=0; } } end End_Chunk Children: ; ;-------Object 179------------------------------------------------------- ; Chunk: Standard Name: "canvas[179]" Number: 179 Size: 200 300 4700 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: SCL short aut=0, p=2, a; long z, z2; resume (2, 2); if (aut==1) { waitfs (random (100)); a=1; p=#175.p; p+=1; if (p>6) p=2; #175.p=p; } if (activate (me, 0) || activate (#176, 0) || activate (#177, 0) || activate (#178, 0)) { a=1; p=#175.p; p+=1; if (p>6) p=2; #175.p=p; } if (a==1) { switch (random (3)); case 0: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (#175, 1)+=z/z2; tyscale (#175, 1)+=z/z2; txoff (#175, 1)=-txscale (#175, 1)/2+128; tyoff (#175, 1)=-tyscale (#175, 1)/2+128; waitf; z=z*2; } a=0; timgref (#175, 1)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (#175, 1)-=z/z2; tyscale (#175, 1)-=z/z2; txoff (#175, 1)=-txscale (#175, 1)/2+128; tyoff (#175, 1)=-tyscale (#175, 1)/2+128; waitf; } txscale (#175, 1)=256; tyscale (#175, 1)=256; txoff (#175, 1)=0; tyoff (#175, 1)=0; } case 1: { z2=random (5)+1; z=1; repeat (8) { txoff (#175, 1)-=z; tyoff (#175, 1)+=z; waitf; z=z*2; } a=0; timgref (#175, 1)=p; clrtrig (me, 0); repeat (8) { txoff (#175, 1)-=z; tyoff (#175, 1)+=z; waitf; z=z/2; } txoff (#175, 1)=256; tyoff (#175, 1)=256; } case 2: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (#175, 1)+=z/z2; tyscale (#175, 1)+=z/z2; waitf; z=z*2; } a=0; timgref (#175, 1)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (#175, 1)-=z/z2; tyscale (#175, 1)-=z/z2; waitf; } txscale (#175, 1)=256; tyscale (#175, 1)=256; txoff (#175, 1)=0; tyoff (#175, 1)=0; } } end End_Chunk Chunk: Colours Number: 6 0x20 0x51 0x53 0x27 0x52 0x56 End_Chunk End_Children ; ;-------Object 176------------------------------------------------------- ; Chunk: Standard Name: "canvas[176]" Number: 176 Size: 200 5400 300 Position: 0 300 4400 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x51 0x53 0x54 0x29 0x2B End_Chunk ; ;-------Object 177------------------------------------------------------- ; Chunk: Standard Name: "canvas[177]" Number: 177 Size: 200 5400 300 Position: 0 300 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x51 0x53 0x54 0x53 0x2B End_Chunk ; ;-------Object 175------------------------------------------------------- ; Chunk: Standard Name: "canvas[175]" Number: 175 Size: 1 5400 4100 Position: 0 300 300 Type: 78 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL short p=2, a; long z, z2; resume (2, 2); if (activate (me, 0)) { a=1; p+=1; if (p>6) p=2; txoff (me, 1)=0; tyoff (me, 1)=0; txscale (me, 1)=256; tyscale (me, 1)=256; timgref (me, 1)=p; waitfs (2); clrtrig (me, 0); } end End_Chunk End_Children ; ;-------Object 106------------------------------------------------------- ; Chunk: Standard Name: "shad" Number: 106 Size: 13000 0 15000 Position: 5482 0 7943 Type: 11 Layer: 0 End_Chunk Chunk: Colours Number: 2 0xE1 0x00 End_Chunk ; ;-------Object 108------------------------------------------------------- ; Chunk: Standard Name: "shad[108]" Number: 108 Size: 13000 0 15000 Position: 28131 0 7800 Type: 11 Layer: 0 End_Chunk Chunk: Colours Number: 2 0xE1 0x00 End_Chunk ; ;-------Object 105------------------------------------------------------- ; Chunk: Standard Name: "shad[105]" Number: 105 Size: 13000 0 15000 Position: 51046 0 7770 Type: 11 Layer: 0 End_Chunk Chunk: Colours Number: 2 0xE1 0x00 End_Chunk ; ;-------Object 342------------------------------------------------------- ; Chunk: Standard Name: "wall5hold[342]" Number: 342 Size: 71000 24000 500 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 34------------------------------------------------------- ; Chunk: Standard Name: "corner3" Number: 34 Size: 500 24000 500 Position: 70500 0 0 Type: 31 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x13 0xB5 0x18 0x15 0xB4 0x1D End_Chunk ; ;-------Object 85------------------------------------------------------- ; Chunk: Standard Name: "wall5" Number: 85 Size: 22000 24000 500 Position: 500 0 0 Type: 8 Layer: 0 End_Chunk Chunk: Colours Number: 30 0x14 0x13 0x12 0xB4 0xB4 0xB4 0xB3 0x14 0x17 0x14 0x17 0xB3 0xB3 0x12 0x15 0x15 0x15 0x15 0x12 0x13 0x13 0x13 0x11 0x16 0x10 0x11 0x12 0x10 0xE0 0xCC End_Chunk ; ;-------Object 267------------------------------------------------------- ; Chunk: Standard Name: "wall5[267]" Number: 267 Size: 24000 24000 500 Position: 22500 0 0 Type: 8 Layer: 0 End_Chunk Chunk: Colours Number: 30 0x14 0x13 0x12 0xB4 0xB4 0xB4 0xB3 0x14 0x17 0x14 0x17 0xB3 0xB3 0x12 0x15 0x15 0x15 0x15 0x12 0x13 0x13 0x13 0x11 0x16 0x10 0x11 0x12 0x10 0xE0 0xCC End_Chunk ; ;-------Object 193------------------------------------------------------- ; Chunk: Standard Name: "wall5[193]" Number: 193 Size: 24000 24000 500 Position: 46500 0 0 Type: 8 Layer: 0 End_Chunk Chunk: Colours Number: 30 0x14 0x13 0x12 0xB4 0xB4 0xB4 0xB3 0x14 0x17 0x14 0x17 0xB3 0xB3 0x12 0x15 0x15 0x15 0x15 0x12 0x13 0x13 0x13 0x11 0x16 0x10 0x11 0x12 0x10 0xE0 0xCC End_Chunk End_Children ; ;-------Object 168------------------------------------------------------- ; Chunk: Standard Name: "Clock-Group" Number: 168 Size: 400 2327 2327 Position: 500 12000 35221 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 183------------------------------------------------------- ; Chunk: Standard Name: "Wallclock" Number: 183 Size: 400 2327 2327 Position: 0 0 0 Type: 61 Layer: 0 End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 344 End_Chunk Children: ; ;-------Object 184------------------------------------------------------- ; Chunk: Standard Name: "ClockFace-Group" Number: 184 Size: 138 1600 1600 Position: 0 363 363 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 185------------------------------------------------------- ; Chunk: Standard Name: "SHand" Number: 185 Size: 0 600 160 Position: 135 763 720 Type: 51 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x10 0x01 0x1F End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 37 80 End_Chunk ; ;-------Object 186------------------------------------------------------- ; Chunk: Standard Name: "Lhand" Number: 186 Size: 0 800 200 Position: 136 750 700 Type: 52 Layer: 0 End_Chunk Chunk: Colours Number: 6 0xD8 0x01 0x01 0xB8 0x05 0x01 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 50 100 End_Chunk ; ;-------Object 187------------------------------------------------------- ; Chunk: Standard Name: "SecHand" Number: 187 Size: 0 800 8 Position: 137 750 796 Type: 53 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 50 4 End_Chunk ; ;-------Object 188------------------------------------------------------- ; Chunk: Standard Name: "CFace-Group" Number: 188 Size: 0 1600 1600 Position: 134 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 5 End_Chunk Chunk: SCL short h, m, s, s2=0; /* stores the hours,minutes and second values of the system clock */ time (&h, &m, &s); /* rotates the hands of the clock relative to the time */ if (s2!=s) { sound (1, 72, -500, 0); s2=s; } xrot (#187)=360-s*6.0000; xrot (#186)=360-m*6.0000-s/10.0000; xrot (#185)=360-h*30.0000-m/2.0000; /* */ end End_Chunk Children: ; ;-------Object 309------------------------------------------------------- ; Chunk: Standard Name: "CFace" Number: 309 Size: 0 1600 1600 Position: 0 0 0 Type: 54 Layer: 0 End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x15 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk Chunk: Distancing Visible: 2500 Invisible: 2656 Replace: 340 End_Chunk ; ;-------Object 340------------------------------------------------------- ; Chunk: Standard Name: "CFace-rep1" Number: 340 Size: 0 1600 1600 Position: 0 0 0 Type: 55 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 30 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x15 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC9 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 End_Chunk End_Children End_Children End_Children ; ;-------Object 344------------------------------------------------------- ; Chunk: Standard Name: "Wallclock-rep" Number: 344 Size: 400 2327 2327 Position: 0 0 0 Type: 50 Layer: 0 DFlags: R OFlags: Ii End_Chunk Children: ; ;-------Object 345------------------------------------------------------- ; Chunk: Standard Name: "ClockFace-Group[12]" Number: 345 Size: 138 1600 1600 Position: 0 363 363 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 346------------------------------------------------------- ; Chunk: Standard Name: "SHand[13]" Number: 346 Size: 0 600 160 Position: 135 763 720 Type: 51 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x10 0x01 0x1F 0x10 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 37 80 End_Chunk ; ;-------Object 347------------------------------------------------------- ; Chunk: Standard Name: "Lhand[14]" Number: 347 Size: 0 800 200 Position: 136 750 700 Type: 52 Layer: 0 End_Chunk Chunk: Colours Number: 6 0xD8 0x08 0x01 0xB8 0x05 0x01 End_Chunk Chunk: Colours Number: 6 0xD8 0x08 0x01 0xB7 0x05 0x01 End_Chunk Chunk: Colours Number: 4 0x10 0x01 0x01 0x10 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 50 100 End_Chunk ; ;-------Object 348------------------------------------------------------- ; Chunk: Standard Name: "SecHand[15]" Number: 348 Size: 0 800 8 Position: 137 750 796 Type: 53 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 50 4 End_Chunk ; ;-------Object 349------------------------------------------------------- ; Chunk: Standard Name: "CFace-Group[16]" Number: 349 Size: 0 1600 1600 Position: 134 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short h, m, s; time (&h, &m, &s); xrot (#348)=360-s*6.0000; xrot (#347)=360- (m*6.0000+s/10.0000); xrot (#346)=360- (h*30.0000+m/2.0000); /* */ end End_Chunk Children: ; ;-------Object 352------------------------------------------------------- ; Chunk: Standard Name: "CFace-rep2[19]" Number: 352 Size: 0 1600 1600 Position: 0 0 0 Type: 56 Layer: 0 End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x15 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC9 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk Chunk: Distancing Visible: 14000 Invisible: 14875 Replace: 353 End_Chunk ; ;-------Object 353------------------------------------------------------- ; Chunk: Standard Name: "CFace-rep3[20]" Number: 353 Size: 0 1600 1600 Position: 0 0 0 Type: 57 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x15 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC9 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk End_Children End_Children End_Children End_Children ; ;-------Object 445------------------------------------------------------- ; Chunk: Standard Name: "desktype2[445]" Number: 445 Size: 12200 20000 8500 Position: 11362 0 63700 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 446------------------------------------------------------- ; Chunk: Standard Name: "desk[446]" Number: 446 Size: 12200 7250 8500 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 447------------------------------------------------------- ; Chunk: Standard Number: 447 Size: 4400 5500 8000 Position: 1000 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 448------------------------------------------------------- ; Chunk: Standard Name: "draw[448]" Number: 448 Size: 4000 1500 6000 Position: 200 500 1800 Type: 12 Layer: 0 End_Chunk Chunk: Colours Number: 25 0x28 0x11 0x2E 0x2F 0x2E 0x2A 0x2B 0x2A 0x00 0x2A 0x42 0x44 0x45 0x45 0x43 0x56 0x43 0x43 0x29 0x46 0x46 0x29 0x42 0x2B 0x15 End_Chunk Chunk: InitPos Position: 200 500 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; end End_Chunk ; ;-------Object 449------------------------------------------------------- ; Chunk: Standard Name: "draw[449]" Number: 449 Size: 4000 1500 6000 Position: 200 2000 1800 Type: 12 Layer: 0 End_Chunk Chunk: Colours Number: 25 0x28 0x11 0x2E 0x2F 0x2E 0x2A 0x2B 0x2A 0x00 0x2A 0x42 0x44 0x45 0x45 0x43 0x55 0x43 0x43 0x29 0x46 0x46 0x29 0x42 0x2B 0x15 End_Chunk Chunk: InitPos Position: 200 2000 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; end End_Chunk Children: ; ;-------Object 450------------------------------------------------------- ; Chunk: Standard Name: "bookgroup[450]" Number: 450 Size: 2000 170 1400 Position: 1000 200 1200 Type: 65535 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFEAAA 0x0000 Centre: 1000 85 700 End_Chunk Children: ; ;-------Object 451------------------------------------------------------- ; Chunk: Standard Name: "book[451]" Number: 451 Size: 1800 0 600 Position: 100 50 100 Type: 60 Layer: 0 OFlags: Ii End_Chunk Chunk: Distancing Visible: 7000 Invisible: 7437 Replace: 452 End_Chunk ; ;-------Object 452------------------------------------------------------- ; Chunk: Standard Name: "book[452]" Number: 452 Size: 1800 0 600 Position: 100 50 100 Type: 13 Layer: 0 OFlags: Ii End_Chunk Chunk: Colours Number: 71 0x12 0x18 0x8E 0x12 0x8E 0x8E 0x15 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x57 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0x8E 0xA7 0xA7 0x02 End_Chunk Chunk: Distancing Visible: 9000 Invisible: 9562 Replace: 453 End_Chunk ; ;-------Object 453------------------------------------------------------- ; Chunk: Standard Name: "book[453]" Number: 453 Size: 1800 0 600 Position: 100 50 100 Type: 14 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x22 0x24 0x27 0x14 0x2B End_Chunk ; ;-------Object 454------------------------------------------------------- ; Chunk: Standard Number: 454 Size: 2000 50 800 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x19 0x18 0x19 0x18 0x16 0x2B End_Chunk End_Children End_Children ; ;-------Object 455------------------------------------------------------- ; Chunk: Standard Name: "draw[455]" Number: 455 Size: 4000 1500 6000 Position: 200 3500 1800 Type: 12 Layer: 0 End_Chunk Chunk: Colours Number: 25 0x28 0x11 0x2E 0x2F 0x2E 0x2A 0x2B 0x2A 0x00 0x2A 0x42 0x44 0x45 0x45 0x43 0x54 0x43 0x43 0x55 0x46 0x46 0x55 0x42 0x2B 0x45 End_Chunk Chunk: InitPos Position: 200 3500 1800 End_Chunk Chunk: Dynamics MovType: 0x80000001 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 0 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Chunk: SCL short dir, open; if (activate (me, 0)) { if (zpos (me)==1800) dir=-200; else { if (zpos (me)==-1000) dir=200; } } zpos (me)+=dir; if (zpos (me)==1800 || zpos (me)==-1000) dir=0; if (zpos (me)==1800) invis (#456); else vis (#456); end End_Chunk Children: ; ;-------Object 456------------------------------------------------------- ; Chunk: Standard Name: "box[456]" Number: 456 Size: 1500 600 2100 Position: 396 100 1415 Type: 65535 Layer: 0 OFlags: Ii End_Chunk Children: ; ;-------Object 457------------------------------------------------------- ; Chunk: Standard Name: "box[457]" Number: 457 Size: 1500 590 2100 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x28 0x29 0x28 0x29 0x27 0x2B End_Chunk ; ;-------Object 458------------------------------------------------------- ; Chunk: Standard Name: "box[458]" Number: 458 Size: 1110 0 192 Position: 191 600 126 Type: 58 Layer: 0 End_Chunk Chunk: Colours Number: 83 0x00 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 0x36 End_Chunk ; ;-------Object 459------------------------------------------------------- ; Chunk: Standard Name: "box[459]" Number: 459 Size: 1110 0 192 Position: 167 600 1692 Type: 59 Layer: 0 End_Chunk Chunk: Colours Number: 83 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 0x34 End_Chunk End_Children ; ;-------Object 460------------------------------------------------------- ; Chunk: Standard Name: "pencil2[460]" Number: 460 Size: 1700 100 100 Position: 2071 200 1927 Type: 28 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x2000 0x0000 Centre: 850 50 50 End_Chunk End_Children ; ;-------Object 461------------------------------------------------------- ; Chunk: Standard Name: "draw[461]" Number: 461 Size: 200 5000 6000 Position: 0 0 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x56 0x55 0x57 0x00 0x00 0x2B End_Chunk ; ;-------Object 462------------------------------------------------------- ; Chunk: Standard Name: "draw[462]" Number: 462 Size: 200 5000 6000 Position: 4200 0 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x57 0x55 0x56 0x00 0x00 0x2B End_Chunk ; ;-------Object 463------------------------------------------------------- ; Chunk: Standard Name: "draw[463]" Number: 463 Size: 4400 5000 200 Position: 0 0 7800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3C 0x57 0x56 0x00 0x00 0x2B End_Chunk ; ;-------Object 464------------------------------------------------------- ; Chunk: Standard Name: "draw[464]" Number: 464 Size: 4400 200 6200 Position: 0 5000 1800 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x55 0x55 0x00 0x54 0x57 End_Chunk End_Children ; ;-------Object 465------------------------------------------------------- ; Chunk: Standard Name: "desk[465]" Number: 465 Size: 11800 200 7500 Position: 200 7050 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x55 0x00 0x00 0x54 0x2B End_Chunk ; ;-------Object 466------------------------------------------------------- ; Chunk: Standard Name: "desk[466]" Number: 466 Size: 11800 4050 200 Position: 200 3000 8300 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x57 0x24 0x00 0x29 0x2B End_Chunk ; ;-------Object 467------------------------------------------------------- ; Chunk: Standard Name: "desk[467]" Number: 467 Size: 200 7250 7500 Position: 0 0 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x55 0x57 0x56 0x00 0x53 0x2B End_Chunk ; ;-------Object 468------------------------------------------------------- ; Chunk: Standard Name: "desk[468]" Number: 468 Size: 200 7250 7500 Position: 12000 0 1000 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x56 0x57 0x55 0x00 0x53 0x2B End_Chunk End_Children ; ;-------Object 469------------------------------------------------------- ; Chunk: Standard Name: "shelves[469]" Number: 469 Size: 12200 8250 3500 Position: 0 7250 5000 Type: 19 Layer: 0 End_Chunk Chunk: SCL if (activate (me, 0)) { if (gvar (0, #77)==-1) alert ("Brett Shelves", 0); else alert ("Brett", 0); } end End_Chunk End_Children ; ;-------Object 477------------------------------------------------------- ; Chunk: Standard Name: "piccy[477]" Number: 477 Size: 200 6000 4700 Position: 500 9000 19664 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 482------------------------------------------------------- ; Chunk: Standard Name: "canvas[482]" Number: 482 Size: 200 5400 300 Position: 0 300 4400 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x51 0x53 0x54 0x29 0x2B End_Chunk ; ;-------Object 483------------------------------------------------------- ; Chunk: Standard Name: "canvas[483]" Number: 483 Size: 200 5400 300 Position: 0 300 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x51 0x53 0x54 0x53 0x2B End_Chunk ; ;-------Object 484------------------------------------------------------- ; Chunk: Standard Name: "canvas[484]" Number: 484 Size: 1 5400 4100 Position: 0 300 300 Type: 78 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL short p=2; /* ########################################################################## if activated; advance picture cycle and set new texture image reference ########################################################################## */ resume (2, 2); if (activate (me, 0)) { p+=1; if (p>6) p=2; txoff (me, 1)=0; tyoff (me, 1)=0; txscale (me, 1)=256; tyscale (me, 1)=256; timgref (me, 1)=p; waitfs (2); clrtrig (me, 0); } end End_Chunk ; ;-------Object 478------------------------------------------------------- ; Chunk: Standard Name: "canvas[478]" Number: 478 Size: 200 300 4700 Position: 0 5700 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x53 0x53 0x54 0x52 0x55 End_Chunk ; ;-------Object 479------------------------------------------------------- ; Chunk: Standard Name: "canvas[479]" Number: 479 Size: 200 300 4700 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short p=2, a; long z, z2; resume (2, 2); if (activate (me, 0)) { a=1; p+=1; if (p>6) p=2; } if (a==1) { switch (random (3)); case 0: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (me, 10)+=z/z2; tyscale (me, 10)+=z/z2; txoff (me, 10)=-txscale (me, 10)/2+128; tyoff (me, 10)=-tyscale (me, 10)/2+128; waitf; z=z*2; } a=0; timgref (me, 10)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (me, 10)-=z/z2; tyscale (me, 10)-=z/z2; txoff (me, 10)=-txscale (me, 10)/2+128; tyoff (me, 10)=-tyscale (me, 10)/2+128; waitf; } txscale (me, 10)=256; tyscale (me, 10)=256; txoff (me, 10)=0; tyoff (me, 10)=0; } case 1: { z2=random (5)+1; z=1; repeat (8) { txoff (me, 10)-=z; tyoff (me, 10)+=z; waitf; z=z*2; } a=0; timgref (me, 10)=p; clrtrig (me, 0); repeat (8) { txoff (me, 10)-=z; tyoff (me, 10)+=z; waitf; z=z/2; } txoff (me, 10)=256; tyoff (me, 10)=256; } case 2: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (me, 10)+=z/z2; tyscale (me, 10)+=z/z2; waitf; z=z*2; } a=0; timgref (me, 10)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (me, 10)-=z/z2; tyscale (me, 10)-=z/z2; waitf; } txscale (me, 10)=256; tyscale (me, 10)=256; txoff (me, 10)=0; tyoff (me, 10)=0; } } end End_Chunk Children: ; ;-------Object 481------------------------------------------------------- ; Chunk: Standard Name: "canvas[481]" Number: 481 Size: 200 300 4700 Position: 0 0 0 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x20 0x22 0x53 0x54 0x52 0x56 End_Chunk Chunk: SCL short aut=0, p=2, a; long z, z2; /* __________________________________________________________________________ VARIABLES aut - automatic texture cycle flag p - current picture on display a - trigger texture change if set to 1 z - texture effects temporary storage z2 - texture effects temporary storage __________________________________________________________________________ */ resume (2, 2); /* ########################################################################## Check for automatic mode if set; advance picture cycle & set trigger ########################################################################## */ if (aut==1) { waitfs (random (100)); a=1; p=#484.p; p+=1; if (p>6) p=2; #484.p=p; /* ########################################################################## if selected; advance picture cycle & set trigger ########################################################################## */ } if (activate (me, 0) || activate (#478, 0) || activate (#482, 0) || activate (#483, 0)) { a=1; p=#484.p; p+=1; if (p>6) p=2; #484.p=p; /* ########################################################################## if trigger set then randomly apply one of three transitions ########################################################################## */ } if (a==1) { switch (random (3)); case 0: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (#484, 1)+=z/z2; tyscale (#484, 1)+=z/z2; txoff (#484, 1)=-txscale (#484, 1)/2+128; tyoff (#484, 1)=-tyscale (#484, 1)/2+128; waitf; z=z*2; } a=0; timgref (#484, 1)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (#484, 1)-=z/z2; tyscale (#484, 1)-=z/z2; txoff (#484, 1)=-txscale (#484, 1)/2+128; tyoff (#484, 1)=-tyscale (#484, 1)/2+128; waitf; } txscale (#484, 1)=256; tyscale (#484, 1)=256; txoff (#484, 1)=0; tyoff (#484, 1)=0; } case 1: { z2=random (5)+1; z=1; repeat (8) { txoff (#484, 1)-=z; tyoff (#484, 1)+=z; waitf; z=z*2; } a=0; timgref (#484, 1)=p; clrtrig (me, 0); repeat (8) { txoff (#484, 1)-=z; tyoff (#484, 1)+=z; waitf; z=z/2; } txoff (#484, 1)=256; tyoff (#484, 1)=256; } case 2: { z2=random (50)+2; if (random (20)<10) z=1; else z=-1; repeat (16) { txscale (#484, 1)+=z/z2; tyscale (#484, 1)+=z/z2; waitf; z=z*2; } a=0; timgref (#484, 1)=p; waitf; clrtrig (me, 0); repeat (16) { z=z/2; txscale (#484, 1)-=z/z2; tyscale (#484, 1)-=z/z2; waitf; } txscale (#484, 1)=256; tyscale (#484, 1)=256; txoff (#484, 1)=0; tyoff (#484, 1)=0; } } end End_Chunk End_Children End_Children End_Children End_Children End_Children ; ;-------Object 115------------------------------------------------------- ; Chunk: Standard Name: "2cam" Number: 115 Size: 2000 2000 2000 Position: 2108326 8139 2011843 Type: 65535 Layer: 0 DFlags: M End_Chunk Chunk: InitPos Position: 2108326 8139 2011843 End_Chunk Chunk: Dynamics MovType: 0x80000020 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 114 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 114------------------------------------------------------- ; Chunk: Standard Name: "1cam" Number: 114 Size: 1000 250 2000 Position: 500 500 0 Type: 46 Layer: 0 DFlags: M End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFE38E 0x0000 Centre: 500 500 1000 End_Chunk End_Children ; ;-------Object 123------------------------------------------------------- ; Chunk: Standard Name: "chair" Number: 123 Size: 6000 10500 6000 Position: 2062588 0 2041315 Type: 65535 Layer: 0 DFlags: M End_Chunk Chunk: InitPos Position: 2062588 0 2041315 End_Chunk Chunk: Dynamics MovType: 0x80000080 Fuel: 0 Climb: 4000 Gravity: 98 Coupled: 122 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 3277 0 3277 Restitution: 12780 6554 12780 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 122------------------------------------------------------- ; Chunk: Standard Name: "top" Number: 122 Size: 5400 6000 6100 Position: 0 4320 -100 Type: 65535 Layer: 0 End_Chunk Chunk: InitPos Position: 0 4320 -100 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFC000 0x0000 Centre: 2700 3000 3050 End_Chunk Children: ; ;-------Object 55------------------------------------------------------- ; Chunk: Standard Name: "SeatBottom" Number: 55 Size: 5400 1425 6100 Position: 0 0 0 Type: 75 Layer: 0 End_Chunk Chunk: SCL if (activate (me, 0)) yrot (parent (me))+=10; end End_Chunk ; ;-------Object 72------------------------------------------------------- ; Chunk: Standard Name: "SeatBack" Number: 72 Size: 5400 4579 6100 Position: 0 1425 0 Type: 74 Layer: 0 End_Chunk Chunk: SCL short r; /* if the back of the chair is activated then add velocity to the chair relative to the direction the top of the chair is facing (the 'chair' is coupled to the 'top's rotation, zdrive unlike zvel is relative to this rotation */ if (activate (me, 0)) zdrive (#123)=-500; if (zdrive (#123)!=0) { zdrive (#123)+=10; r=yrot (parent (me))-90; yrot (#49)=r; yrot (#50)=r; yrot (#51)=r; yrot (#52)=r; yrot (#53)=r; /* reduces the driving force by 10 each frame */ } end End_Chunk End_Children ; ;-------Object 46------------------------------------------------------- ; Chunk: Standard Name: "bottom" Number: 46 Size: 5820 4320 6120 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 48------------------------------------------------------- ; Chunk: Standard Name: "stem" Number: 48 Size: 580 1505 580 Position: 2318 2815 2734 Type: 77 Layer: 0 End_Chunk Chunk: SCL short d=50; if (activate (me, 0) && ysize (me)>50) { ysize (me)-=d; write (&ypos (#122))-=d; } end End_Chunk Chunk: InitSize Size: 580 1505 580 End_Chunk ; ;-------Object 174------------------------------------------------------- ; Chunk: Standard Name: "stem-B" Number: 174 Size: 580 1715 580 Position: 2318 1100 2734 Type: 76 Layer: 0 End_Chunk Chunk: SCL short d=50; if (activate (me, 0) && ysize (#48)<1700) { ysize (#48)+=d; write (&ypos (#122))+=d; } end End_Chunk ; ;-------Object 116------------------------------------------------------- ; Chunk: Standard Name: "legs" Number: 116 Size: 5820 500 6120 Position: 0 600 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 117------------------------------------------------------- ; Chunk: Standard Name: "leg5" Number: 117 Size: 3220 500 760 Position: 2600 0 2680 Type: 24 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 0 380 End_Chunk ; ;-------Object 42------------------------------------------------------- ; Chunk: Standard Name: "legsort" Number: 42 Size: 2100 500 2000 Position: 53 0 969 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 120------------------------------------------------------- ; Chunk: Standard Name: "leg2" Number: 120 Size: 3220 500 760 Position: 2547 0 1711 Type: 24 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x6666 0x0000 Centre: 0 0 380 End_Chunk End_Children ; ;-------Object 45------------------------------------------------------- ; Chunk: Standard Name: "legsort[45]" Number: 45 Size: 2100 500 2000 Position: 49 0 3024 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 119------------------------------------------------------- ; Chunk: Standard Name: "leg3" Number: 119 Size: 3220 500 760 Position: 2551 0 -344 Type: 24 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFF999A 0x0000 Centre: 0 0 380 End_Chunk End_Children ; ;-------Object 43------------------------------------------------------- ; Chunk: Standard Name: "legsort[43]" Number: 43 Size: 2000 500 2300 Position: 2224 0 66 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 121------------------------------------------------------- ; Chunk: Standard Name: "leg1" Number: 121 Size: 3220 500 760 Position: 376 0 2614 Type: 24 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x3333 0x0000 Centre: 0 0 380 End_Chunk End_Children ; ;-------Object 44------------------------------------------------------- ; Chunk: Standard Name: "legsort[44]" Number: 44 Size: 2000 500 2300 Position: 2285 0 3745 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 118------------------------------------------------------- ; Chunk: Standard Name: "leg4" Number: 118 Size: 3220 500 760 Position: 315 0 -1065 Type: 24 Layer: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFCCCD 0x0000 Centre: 0 0 380 End_Chunk End_Children End_Children ; ;-------Object 54------------------------------------------------------- ; Chunk: Standard Name: "casters" Number: 54 Size: 5820 600 6120 Position: 0 0 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 52------------------------------------------------------- ; Chunk: Standard Name: "caster4" Number: 52 Size: 500 600 300 Position: 3420 0 5720 Type: 25 Layer: 0 DFlags: r End_Chunk Chunk: SCLLocal Triggers: 0xFFFF if (activate (me, 0)) yrot (me)+=30; end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 125 300 150 End_Chunk ; ;-------Object 49------------------------------------------------------- ; Chunk: Standard Name: "caster1" Number: 49 Size: 500 600 300 Position: 50 0 1150 Type: 25 Layer: 0 End_Chunk Chunk: SCLLocal Triggers: 0xFFFF if (activate (me, 0)) yrot (me)+=50; end End_Chunk Chunk: Rotations Initial: 0x0000 0x2000 0x0000 Centre: 125 300 150 End_Chunk ; ;-------Object 50------------------------------------------------------- ; Chunk: Standard Name: "caster2" Number: 50 Size: 500 600 300 Position: 70 0 4670 Type: 25 Layer: 0 DFlags: r End_Chunk Chunk: SCLLocal Triggers: 0xFFFF if (activate (me, 0)) yrot (me)+=30; end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 125 300 150 End_Chunk ; ;-------Object 51------------------------------------------------------- ; Chunk: Standard Name: "caster3" Number: 51 Size: 500 600 300 Position: 3350 0 0 Type: 25 Layer: 0 End_Chunk Chunk: SCLLocal Triggers: 0xFFFF if (activate (me, 0)) yrot (me)+=30; end End_Chunk Chunk: Rotations Initial: 0x0000 0x31C7 0x0000 Centre: 125 300 150 End_Chunk ; ;-------Object 53------------------------------------------------------- ; Chunk: Standard Name: "caster5" Number: 53 Size: 500 600 300 Position: 5400 0 2920 Type: 25 Layer: 0 DFlags: r End_Chunk Chunk: SCLLocal Triggers: 0xFFFF if (activate (me, 0)) yrot (me)+=30; end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 125 300 150 End_Chunk End_Children End_Children End_Children ; ;-------Object 89------------------------------------------------------- ; Chunk: Standard Name: "ManVp" Number: 89 Size: 4000 12000 4000 Position: 2049159 0 2048657 Type: 65535 Layer: 0 DFlags: M End_Chunk Chunk: Colours Number: 18 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 0x05 End_Chunk Chunk: InitPos Position: 2049159 0 2048657 End_Chunk Chunk: Dynamics MovType: 0x800000A1 Fuel: 0 Climb: 4000 Gravity: 98 Coupled: 90 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 90------------------------------------------------------- ; Chunk: Standard Name: "ManVpRot" Number: 90 Size: 1000 800 1000 Position: 1500 6100 1500 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 0x04 End_Chunk Chunk: Rotations Initial: 0x0000 0x4000 0x0000 Centre: 400 400 400 End_Chunk ; ;-------Object 91------------------------------------------------------- ; Chunk: Standard Name: "ManBrain" Number: 91 Size: 1000 800 1000 Position: 1500 11000 1500 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C End_Chunk Chunk: SCL /* Visiblise parent object 'ManVp' depending on current viewpoint number. */ if (getvp==2) vis (#89); else invis (#89); end End_Chunk End_Children End_File